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… LA solution pour relier aux Apple //e et ][+ : 


un “Apple 3.5 GS Platinum” 800Ko 
un lecteur Macintosh 800Ko 
un lecteur Macintosh 400Ko 


un lecteur Chinon 800Ko 
un Unidisk 5,25” 140Ko 


Connectée à n'importe quel port, elle pilote deux lecteurs (même 
différents, pouvant totaliser 1,6 méga). Elle permet le travail bit à 
bit avec tous les lecteurs d'aujourd'hui (ce travail était impos- 
sible avec l'Unidisk 3.5”). 


Carte UDC : 1 050,00 F TTC franco 
Tarif carte Pom's Joker : 945,00 F TTC 
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Pour savoir si la créativité a 
vraiment quelque chose à voir avec la 
productivité, venez à Apple Expo 
retrouver Apple et tous ses 
partenaires. Installée au CNIT, le plus 
grand centre de communication et 
d'échanges du monde, Apple Expo 
vous présente tous les moyens de 


- Un jour, on te parlera de la créativité 
N'écoute pas. Ça n a vraiment rien à 


développer la créativité et donc la 
productivité des hommes. 

C'est l'occasion ou jamais de venir 
découvrir ou redécouvrir le «monde 
Macintosh». Les nouveaux Macintosh 
vous seront présentés en exclusivité 
ainsi que les dernières applications et 
matériels périphériques vous 


Apple go Apple, Macintosh sont des marques déposées de Apple Computer Inc. 


permettant de développer toutes les 
facettes de votre créativité quel que 

soit votre domaine : traitements de 

texte et tableurs bien sûr, mais aussi 
publication et présentation assistées 
par ordinateur ou encore CAO, DAO. 
Enfin, vous verrez qu'il est très facile 
de mettre Macintosh en réseau ainsi 








au service de la productivité. 
VOir. 





Pire.) 


que d'entrer en contact avec d’autres septembre au CNIT. Et si vous croisez 
environnements ; il n'existe donc plus cet homme dans sa grosse voiture, 
de barrière au bureau, toute n'hésitez pas à lui en toucher deux 
communication avec l'extérieur étant mots. Ça ne peut que l’intéresser. 
désormais très simple. Maintenant si Pour recevoir votre invitation ou 
vous désirez de plus amples connaître le calendrier des 
informations, venez donc nous voir : conférences, tapez sur votre Minitel 
Apple Expo a lieu du 27 au 30 3614 Code Apple. 


Apple Expo 


CLM/BBDO 








ExXTRAFONTS 


DEUX APPLICATIONS, COLORFoNTs 
ET EDIFONTS, QUI DONNERONT A 
VOTRE APPLE WORKS /TIMEOUT 
ENCORE PLUS DE SOUPLESSE ET DE 
PUISSANCE 


- ColorFonts donne à TimeOut SuperFonts la 
couleur. 

- EdiFonts est un éditeur de polices qui dépasse 
de loin les possibilités d’Edipol et FontViewer 
réunis. 


CoLorFontTs 


Votre SuperFonts monochrome (version française 
Pom's) est transformé en ColorFonts, permettant 
désormais l'impression dans les sept couleurs de 
l'Imagewriter II (noir, jaune, rouge, bleu, orange, 
vert et violet), en conservant bien sûr toutes les 
possibilités de SuperFonts (polices et styles variés, 
justification à droite, tabulations, impression 
d'images). 

Les changements de couleurs peuvent, comme les 
changements de polices ou de styles, intervenir à 
tout endroit, même au milieu d’un mot. Vous 
pouvez aussi imprimer une image dans la couleur 
souhaitée. 


En bonus, ColorFonts vous donne aussi accès aux 
caractères normalement inaccessibles par Super- 
Fonts (codes O à 31). 


Bien entendu, les commandes habituelles restent 
inchangées. 


ColorFonts est compatible avec les autres impri- 
mantes, mais imprime alors en monochrome. 


de DANIEL LUROT 


EDIFONTS 
Une nouvelle application TimeOut 


Avec EdiFonts, vous pourrez visualiser, modifier et 
imprimer vos polices de caractères, mais aussi en 
créer de nouvelles (en partant de zéro), copier des 
caractères d'une police vers une autre. Tout ceci 
sans quitter AppleWorks ! 

Avec à votre disposition un index des polices 
(analogue à l'index des fichiers AppleWorks) per- 
mettant de travailler sur plusieurs polices (jusqu’à 
sept à la fois). 


Affichage de la police page par page, commandes 
ergonomiques 

Accès rapide aux caractères désirés 

Copie d'écran graphique 

Impression de la police complète 

Visualisation individuelle et modification des 
caractères 

Édition rapide grâce à des commandes puis- 
santes : insertion ou effacement de colonnes ou 
de lignes — déplacement du caractère tout 
entier dans les quatre directions — effacement 
de la grille d'édition — modification des ‘width’et 
‘offset’ 

Création de nouveaux caractères 

Copie de caractères interne, vers le presse-papiers, 
du presse-papiers 

Suppression de caractères 

Visualisation, impression et modification des 
paramètres globaux de la police — firstC — 
lastC — leading et kernMax — ascent — descent 
— nom de la police 


La disquette ExtraFonts existe en 5,25"/140Koet 3,5"/800Ko. ExtraFonts est compatible avec les Apple 


//e 128Ko, //c, IIGS. 


ColorFonts nécessite AppleWorks, une ImageWriter II et TimeOut SuperFonts en version française. 
EdiFonts nécessite AppleWorks et au moins un TimeOut en version française. 


ExtraFonts : 500,00 F — Carte Joker : 450,00 F — Bon de commande page 70 
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Éditions cat d'Anjou 200 exposants, dont Pom's, attendent 50 000 visiteurs cette 
78000 Versailles — # (1) 39 51 24 43 année dans le nouveau CNIT de La Défense. Apple 
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Le programme ci-dessous est une 
extension du programme “Bram 
Master” publié dans Pom’s n° 41 : 
son but est de mettre en un seul 
programme les routines 
d’initialisation ou de réinitialisation de 
la machine dont je me sers le plus 
fréquemment. 


Je n’ai en effet pas seulement à 
rétablir ma configuration de Bram : je 
me suis également aperçu que j'avais 
fréquemment à “purger” la mémoire du 
GS. Sans quoi certaines applications, 
ou bien refusaient de se charger, ou 
bien plantaient, malgré mes 2,3 
Mégas de mémoire en ligne. Il 
apparaît en effet que certaines 
applications gèrent de façon pour le 
moins cavalière (fautive, en fait) les 
appels au gestionnaire de mémoire du 
GS, le Memory Manager. Parmi 
celles-ci, AppleWorks, PaintWorks 
Gold, et le Linker d'APW... 


Au départ, ce programme incluait une 
routine de configuration du port série 
pour lui donner un buffer de 64Ko, 
inspirée de celle de Gary Little. La 
routine marchait, mais le buffer 
interne du GS est trop bugué : il vaut 
mieux ne pas s’en servir du tout. 


En revanche, j'ai ajouté quatre 
sous-routines pour configurer la carte 
accélérateur TransWarp GS, d’Applied 
Engineering, de façon que je puisse 
lancer Thexder sans me faire ridiculiser 
ensuite. 
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TOUT EFFACER / 
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Confier votre Tableau de Bord à J.-Y. Bourdin, 
est-ce bien raisonnable. 





Obéir au Bureau 
Politique 


Les “bidouilles” avec le Memory 
Manager et les outils GS ne sont plus 
de saison. Avec GS/OS, le niveau de 
maturité du système du GS interdit 
désormais les fantaisies. Quoi que 
nous en ayons, il est temps désormais 
de nous plier, serait-ce en maugréant, 
aux directives du Bureau Politique. 
Sans quoi, c’est l’utilisateur qui paye, 
par des “plantages” intempestifs, 
l’indiscipline ou l’impatience des 
programmeurs. 


C’est d’ailleurs pourquoi je prêche 
d'exemple en m'y soumettant 
moi-même. Le “noyau” de GS.INIT 
est composé du lancement de trois 
outils (Tool Locator, Miscellaneous 
Toolset et Memory Manager), puis de 
leur fermeture, dans l’ordre spécifié par 
le Bureau Politique. 


«Que d’octets inutiles !», dira le 
programmeur formé à la chasse aux 
octets sur Apple //. Effectivement, je 
n’ai encore jamais vu de situation où 
cette “bande des trois” ne soit pas déjà 
active : ils sont toujours là. Mais 
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Apple nous demande de le faire, 
faisons-le. Ceci dit, si vous ne le 
faites pas dans le programme que vous 
taperez pour vous, c’est votre affaire. 


De la même façon, le programme 
passe son temps à alterner entre mode 
16 bits et mode 8 bits (je préfère cette 
formule à la formule “mode 
natif/mode émulation” : en mode 8 
bits, toutes les instructions du 65816 
fonctionnent, il ne se comporte pas 
comme une “émulation” qui ne 
reconnaîtrait que les instructions du 
6502). 


Il fallait choisir un “standard” pour les 
sous-routines, j’ai choisi le huit bits. 
Là aussi, que d’octets inutiles : mais 
que de plantages évités si on fait 
constamment attention à bien préciser 
au 65816, et à notre assembleur, en 
quel mode il doit être. 


Un programme GS, il faut s’y faire, 
est toujours un peu verbeux, et gâche 
quelques octets. C’est la condition 
pour s’y repérer, et puis on compte la 
RAM en Mégas, désormais. 
Attention, j’ai dit “un peu” verbeux, 
et “quelques” octets : cela n’excuse pas 
les abus “à la PaintWorks Gold” ! 


Purger la mémoire 


Précisons, pour ceux qui ne le savent 
pas, ce qu’est la purge mémoire : une 
application comme le Finder, par 
exemple, a besoin de certains outils 
qui sont sur la disquette système, et il 
les charge en mémoire. Quand on 
quitte le Finder, en lançant un 
programme par exemple, celui-ci 
devrait dire au système de libérer 
l’espace mémoire occupé par ces 
outils, et par le Finder lui-même. 


Oui, mais l’application suivante va 
peut-être avoir besoin des mêmes 
outils, qu’il va falloir alors recharger à 
nouveau du disque. De plus, en 
quittant l’application suivante, on va 
retourner au Finder, qu’il va falloir 
encore recharger du disque. 


Le Memory Manager permet donc de 
laisser certains segments de 
programme, certaines ressources 
système, chargés en mémoire, mais 
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VersionSoft, ça plante ! 
Exemple parfait de ce qu’il ne faut pas faire avec le Memory Manager du GS : 


LDA #0003 ; charge la valeur 03/0000 
STA OO00AF8 >; dans une variable 


00/1FA4 :A9 03 00 
00/1FA7 :8F F8 OA O0 


00/1FAB :A9 00 00 LDA #0000 

00/1FAE :8F F6 OA 00 STA OO0AF6 

00/1FB2 :48 PHA ; démarre appel à NewHandle 
00/1FB3 :48 PHA 

00/1FB4 :F4 OA 00 PEA O00A ; longueur du bloc demandé 
00/1FB7 :F4 00 00 PEA 0000 ; = 640Ko 

00/1FBA :AD 82 C5 LDA C582 ; pour mon identificateur 
00/1FBD :48 PHA 

00/1FBE :F4 02 80 PEA ##10000000 00000010 ; attributs : 


verrouillé, adresse fixe 
à créer à partir de 
l'adresse fixe 


00/1FC1 :AF F8 OA O0 LDA OOOAF8 7; 


00/1FC5 :48 PHA ; 03/0000 (début du banc 3) 
00/1FC6 :AF F6 OA 00 LDA OO0AF6 

00/1FCA :48 PHA 

00/1FCB :A2 02 09 LDX #0902 ; appel à 

00/1FCE :22 00 00 El JSL $E10000 ; NewHandle 

00/1FD2 :90 12 BCC 1FE6 ; Si ok, passe à la suite 
00/1FD4 :68 PLA 

00/1FD5 :68 PLA 

00/1FD6 :AF F8 OA 00 LDA OO0AF8 >; sinon incrémente partie 
00/1FDA :1A INC haute de l'adresse du banc 


mémoire demandé 
00/1FDB :8F F8 OA 00 STA OO0AF8 >; pour le début de mon bloc 
00/1FDF :C9 08 00 CMP #0008 ; mâis on ne peut pas 
occuper au-dessus 


00/1FE2 :D0 CE BNE 1FB2 ; de $03 + SOA + $ 07 = $15. 


00/1FE4 :00 4C BRK 4C ; Sinon, BREAK : tu plantes 
la machine ! ! ! 
00/1FE6 :68 PLA ; il doit rester de la place 


pour charger 


00/1FE7 :8F FA OA 00 STA OOOAFA ; les outils et le système. 


00/1FEB :68 PLA 
00/1FEC :8F FC OA 00 STA OOOAFC 
00/1FF0 :F4 00 00 PEA 0000 
00/1FF3 :F4 A6 OA PEA 0AA6 
00/1FF6 :A2 01 OE LDX #0E01 


00/1FF9 :22 00 00 El JSL E10000 >; LoadTools 


Ce qui se trouve ci-dessus est le désassemblage commenté de ce que j’ai pu 

trouver, suite à une remarque d’Yvan Koenig, à l’octet S1FA4 dans ma version 

de PaintWorks Gold. Une conjonction exemplaire de deux énormes erreurs 
volontaires : 

1° Faire comme si il ne pouvait pas y avoir d’extension mémoire supérieure à 
1,2 Mégas pour le GS (!) 

2 En cas d’insuffisance de mémoire libre en-dessous de ce 1,2 Méga, ne pas 
quitter proprement, ne rien dire à l’utilisateur, même pas renvoyer à une 
erreur ProDOS : planter, tout simplement. Ça plante : c’est étudié pour ! 

Et je ne parlerai pas de la pratique qui consiste à demander un bloc de 640Ko, 

d’un seul tenant, commençant à une adresse fixe, au Memory Manager, en lui 

interdisant même de déplacer ce bloc en mémoire ensuite... Voir “Le 

mange-mémoire” dans Pom’s 37 page 59. 

Vous avez donc bougrement intérêt, si vous utilisez des logiciels VersionSoft, à 

les lancer par GS.INIT, avec la routine de purge et de compactage préalables 

de la mémoire. Mais PaintWorks Gold est un excellent logiciel par ailleurs. 

Vous trouverez un patch pour corriger son erreur dans Pom’s 42 page 64. 


a LE | + 
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Bientôt d’ailleurs, je l’espère, nous J'ai donc choisi pour purger la 















dans un état “purgeable” : si 
l'application suivante n’a pas besoin 
de toute la mémoire disponible, elle 
trouvera ses outils déjà chargés en 
mémoire. Et l’on pourra retourner 
quasi-instantanément au Finder en 
sortant. 

Si en revanche elle a besoin de toute 
la mémoire, le Memory Manager 
“purgera” ces segments purgeables et 
rangera (“compactera”) la mémoire 
disponible pour faire de la place. Le 
Memory Manager raffine même, en 
fixant 3 niveaux différents de purge, ce 
qui permet de fixer des priorités dans 
la purge. 

Toutes ces subtilités permettent d’aller 
le plus vite possible avec un espace 
mémoire restreint. Elles signifient que 
plus vous aurez de mémoire, plus le 
GS tournera vite, et moins il fera 
d’accès disque. Ce sont ces subtilités 
qu’ignorent les applications 
“primaires”, comme AppleWorks ou 
PaintWorks Gold, dont le seul souci 
est de manger pour elles-mêmes le 
plus de mémoire possible. Il faut donc 
purger nous-mêmes, avant et/ou après 
elles. 


Comment purger ? 


J'utilisais auparavant la routine de 
purge mémoire de Glen Bredon dans 
Merlin 16 Plus et de Mike Westerfield 
dans Call Apple d’Avril 89, mais jy 
ai renoncé. Cette routine purge la 
mémoire bloc par bloc, en cherchant 
pour chacun des “handles” concernés 
s’il est purgeable ou non. 


Cette routine marche, et elle a 
l’avantage de permettre si on le veut 
d’afficher à chaque fois quel bloc on 
libère. Mais elle utilise la 
connaissance des enregistrements du 
Memory Manager : or cette structure 
n’est absolument pas garantie par 
Apple, et il est possible que cette 
routine ne marche plus dans les 
versions ultérieures des outils. 
Toujours le soumission au Bureau 
Politique 


n’aurons plus à purger la mémoire : 
les dernières versions du Memory 
Manager ont en effet un appel 
“RealMem”, distinct du classique 
“FreeMem”, qui renvoie non 
seulement l’espace mémoire libre, 
mais l’espace mémoire libérable au 
total après purge et compactage. Une 
application pourra donc savoir 
exactement sur combien de mémoire 
elle peut compter. 


mémoire une formule qui devrait rester 
compatible, tout en restant 
évidemment dans une certaine mesure 
une bidouille (nous sommes sur 
Apple //, n’est-ce pas). 


Au lieu que le programme purge 
lui-même, bloc après bloc, mon idée a 
été de demander au Memory Manager 
de m’allouer un bloc mémoire de. 16 
Mégas ! Bien entendu, le Memory 





GS.INIT 


1 
# HÉRÉÉÉRARÉÉRRÉRRRRRARR RAA RER ÉARARRÉNÉR EE 
3 * * 
4 * GS INIT. e] 
5 * * 
6 * Ce programme se charge de mettre ou remettre le * 
7 * GS dans la configuration choisie par * 
8 * l'utilisateur. cd 
9 * * 
10 * Il comprend un noyau standard qui lance et ferme* 
71 * les outils, et un choix des différentes formes * 
12 * de Quit possibles sous Prodos 8. Il incorpore * 
23 * pour le moment trois sous-routines : * 
14 * * 
15 * — PURGE.MEM : Purge et compacte la mémoire * 
16 * - MODBRAM : Reconfiguration automatique de la * 
17 * mémoire sauvegardée * 
18 * - Trois sous-routines de configuration de la * 
19 # carte Transwarp GS Appplied. # 
20 Li * 
21 * Assembleur Merlin 16 Plus. # 
22 * J.Y. Bourdin, Pom’s 44. * 
23 * * 
24 RRRRRARRARRRRRRRRRRRÉRRÉRRRÉRRRRARRRRRRRARRRRRRÉRRRÉR ARR 
25 
26 
=BF00 27 MLI EQU $BF00 
-E10000 28 TOOLBOX EQU $E10000 
29 
30 MX #11 ; on démarre en mode 
31 ; émulation (8 bits) 
32 ORG $2000 
33 
35 
36 DSK GS.INIT 
37 TYP $FF 
38 
002000 : 20 58 FC 39 JSR $FC58 ; Home 
40 
002003 : 38 41 2VERIFGS SEC : vérifie qu’on est sur 
002004 : 20 1F FE 42 JSR $FE1F ;: GS 
002007 : 90 03 =200C 43 BCC INTRO 
002009 : 4C 64 20 44 UMP P8QUIT : sinon quitte 
45 
00200C : 18 46 INTRO CLC ; passage en 16 bits 
00200D : FB 47 XCE 
00200E : C2 30 48 REP #00110000 
002010 : A2 01 02 49 LDX  4$0201 ; TLStartup : démarre le 
002013 : 22 00 00 El 50 JSL TOOLBOX ; Tool Locator 
002017 : F4 00 00 51 PEA 450000 
00201A : A2 02 02 52 LDX  #$0202 ; MMStartUp : démarre le 
00201D : 22 00 00 El 53 JSL TOOLBOX ; Memory Manager 
002021 : 68 54 PLA 
002022 : 8D 62 20 55 STA MYID 
002025 : A2 03 02 56 LDX #50203 ; MTStartup : démarre le 
002028 : 22 00 00 El 57 JSL TOOLBOX ; Misc Tooiset 
58 
00202C : 38 59 SEC : repasse en 8 bits, car 
00202D : FB 60 XCE ; les sous-routines 
61 ; démarrent en 8 bits 
62 
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Manager n’est pas près de pouvoir me 
le donner. Mais, avant de me le 
refuser, il commence par tout “tasser” 
(purger et compacter) de lui-même. 
C’est seulement ensuite qu’il 








s'aperçoit qu’il n’a pas assez de 00202E : 20 EC 20 63 JSR  PURGEMEM 
D | 64 

mémoire : Mais la purge est faite. 002031 : 20 35 21 65 JSR MODBRAM 

Au cas où le Memory Manager, un ce 

jour, aurait 16 Mégas à m'allouer (!), 002034 : 20 75 22 “ JSR TWFAST 

le programme les lui redonne 002037 : 20 8p 22 69 JSR  TWSLOW 

aussitôt : dans ce cas donc, tout ne Don DS . nn ee 

serait pas purgé, mais on aurait 16 | 72 

Mégas de libres, ce qui devrait suffire 00203) : 20 Bc 22 73 JSR  IROSLOW 

pour nos applications. 7 

L'’inconvénient de ce choix, c’est que 002040 : 18 76 FIN CLC ; passage en 16 bits 

se . . . 002041 : FB 77 XCE 

l’utilisateur de la routine ne voit rien  h52942 : c2 30 7e REP  300110000 

du tout, il n’y a pas d’affichage des 002044 : a2 03 03 79 LDX  4$0303 : MTShutDown 
. F : , ° 002047 : 22 00 00 El 80 JSL TOOLBOX 

blocs libérés. Mais c’est précisément Us D 620 Fe ON 


ce dont j'avais besoin : on purge et ON  00204€ : 48 82 PHA 
quitte, c’est tout, pas besoin de  20204F : A2 02 03 83 LDX  4$302 ; MMShutDown 
, 002052 : 22 00 00 El 84 JSL TOOLBOX 
raconter sa vie. 002056 : A2 01 03 85 LDX  #$0301 ; TLShutDown 
002059 : 22 00 00 E1 86 JSL TOOLBOX 
90205D : 38 87 SEC : retour en 8 bits 
00205E : FB 88 XCE 
Un bug 0020SF : 4C 74 20 89 UMP LAUNCH ; ou P8QUIT ou HRDRBT 
3 W 90 ; ou APLRET 
d Apple orks 002062 : 00 00 91 MYID DS 2,#$00 
92 
À 93 Éiitiiihiitiiiiiiihéiaiiékéthatifiééétféaitéétéihé# 
Quelqu’un (peut-être votre serviteur ?) 94 
a signalé un jour que quand on lançait 95 * Choix du Quit 
. . 96 
AppleWorks deux fois de suite SOUS Re Se ; ia laine 
ProDOS 16, on gagnait environ 98 
100Ko pour le bureau. AppleWorks 002064 : 20 00 BF 99 P8QUIT JSR MLI ; Quit Prodos 8 ordinaire 
. 002067 : 65 100 DFB 4565 
pour augmenter “RealFreeMem” (qui 022054 : 80 00 =206c 102 BCS  :ERR 
s’accroît de 100Ko après le passage  °°295C : 90 ne 
d’AppleWorks). C'est vrai, Mais  99206p : 04 105 :PARM DFB 4504 
ensuite... le plantage guette. 00206E : 00 106 DFB #$00 
00206F : 00 00 107 DA $0000 
. us 002071 : 00 108 DFB #$00 
AppleWorks fait en effet une bêtise 002072 : 00 00 109 DA $0000 
“de débutant” dans la gestion de la _ L 
. x 002074 : 20 00 BF 111 LAUNCH JSR MLI ; Quit Prodos 8 
mémoire du GS : quand une 52077 : 65 112 DFB 4565 ; “Enhanced” 
application démarre le Memory 002078 : 7D 20 113 DA :PARM 
, . G0207A : B0 00 =207C 114 BCS 2ERR 
Manager (voir les lignes 50 à 54 ns ed Er 
ci-dessous), celui-ci répond en lui  59207p : 04 116 :PARM DFB 4#$04 
accordant un numéro d'identification Es : BE : 117 DEB  A$EE 
0 F'rUS2 118 DA :NAME 
(Userld). Et AppleWorks À 002081 : 00 119 DFB 4500 
parfaitement raison, en quittant, de 002082 : 00 00 120 DA  $0000 
121 


dire au Memory Manager qu’il peut 
$ : és k 002084 : OF 2F 53 2F 122 :NAME STR */S/SYSTEM/START’ ;mettre le chemin 
disposer de la mémoire qu’il avait  oo2088 : 53 59 53 54 45 4D 2F 53 


accordée à l’application (DisposeAIl), 992090 : 54 41 52 54 

123 ; d'accès complet du 
avant de clore le Memory Manager. eS ME) es 
Oui, mais AppleWorks est une 002094 : EA EA EA EA 125 Ds 30, #$EA 


: : 002098 : EA EA EA EA EA EA EA EA 
application ProDOS 8, et non 0020A0 : EA EA EA EA EA EA EA EA 


ProDOS 16. Si on a démarré sous 002018 : EA EA EA EA EA EA EA EA 


GS/OS par exemple, le Memory 222950 : FA FA Le. 

Manager attribue systématiquement 092082 : 18 127 HRDRBT  CLC ; passage en 16 bits 
aux applications ProDOS 8 qui font 002083 : F8 128 XCE 

un MMStartup l’identificateur de ?°2°%%* : 2 30 pa Pr PR 

ProDOS lui-même ($3001). 002086 : A9 51 00 131 LDA  4$0051 ; Hard Reboot de Bill 
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Quand une application dit au Memory 
Manager de libérer la mémoire 
occupée par ProDOS, il nettoie tout 
l’espace mémoire occupé par le 
système, y compris l’espace mémoire 
en page zéro occupé par ProDOS 8 
lui-même. Le Memory Manager pense 
par exemple que la page 00/BF00 est 
libre, et l’attribue au deuxième 
lancement d’AppleWorks, comme tout 
le reste de la mémoire, au bureau 
d’AppleWorks ! Faites une 
carte-mémoire du GS sous 
AppleWorks lancé pour la seconde 
fois, et vous aurez des surprises. On 
gagne 100Ko, mais à quel prix ! 


Une application Système 16 n’a pas 
ce problème, son identificateur n’étant 
pas celui de ProDOS. Mais, dans tous 
les cas, le mieux est bien de suivre la 
procédure recommandée par le Bureau 
Politique (Toolbox Reference, vol 1) : 
avant toute demande de mémoire par 
un appel NewHandle, commencer par 
modifier le champ auxiliaire du 
numéro d'identification, ou demander 
un nouvel identificateur par 
l’intermédiaire du Miscellaneous 
Toolset (GetNewld). 


Au fait, oui, un mot de la solution : il 
faudrait sans doute patcher 
AppleWorks, plus exactement réécrire 
toute la partie de gestion de’ la 
mémoire du GS, pour la mettre en 
conformité avec les règles Apple. Je 
crois que cela a été fait avec la version 
3.0. 


Pour ma part, je m’en tire en lançant 
AppleWorks depuis un fichier S16 qui 
s’installe en mémoire, et auquel 
AppleWorks renvoie donc 
obligatoirement en sortie. Etant un 
fichier S16, il relance le système dès 
qu’AppleWorks quitte. Si vous lancez 
AppleWorks depuis le Finder ou 
depuis Prosel 16, ou tout autre lanceur 
S16, ça ira aussi. Mais ça n'ira pas si 
vous le lancez directement depuis 
Prosel 8. 


002089 
0020BB 
0020BE 
0020cC1 
0020C4 
0020C7 
0020CA 


0020CE 
0020CF 


0020D0 
0020D1 
0020D3 
0020D6 
0020D9 
0020DC 
0020DE 
0020E1 
0020E3 
0020E6 
0020E9 


0020EC : 
0020ED : 
0020EE : 


0020F0 
0020F3 
0020F6 


. 


0020F9 : 


0020FD 


0020FE : 


002101 
002104 
002107 
00210A 


00210D : 


CRETE 


002110 : 
002111 : 


002114 : 


002117 : 


00211A : 
00211D : 
002121 : 


002123 : 


002124 
002125 
002128 
002129 
00212C 


002130 
002131 
002132 


.. 


. 


002133 : 


30 


02 
00 


00 


EE  —  " "  ——" a | 


00 El 


co 
co 
co 
co 
co 


03 
FF 


00 El 


00 E1 





171 
172 
173 
174 
175 
176 
177 
178 
179 
180 
181 
182 
183 
184 
185 
186 
187 
188 
189 
190 
191 
192 
193 
194 
195 
196 
197 
198 
199 
200 
201 
202 
203 
204 
205 
206 
207 
208 
209 
210 
211 
212 
213 


STA $00 ; Basham pas du tout 

PEA $0002 ; garanti par Apple 

PEA  $0000 

PEA $0000 

PEA  $0008 

LDX 4#$0909 

JSL TOOLBOX 

SEC +: retour en 8 bits 

XCE 
APLRBT SEI ; Reboot recommandé par 

LDA #$0c ; Apple sur GS 

STA $c068 ; StateReg 

STZ $c047 ;: CirVblint 

STZ  $C041 : IntEn 

LDA #$09 

STA $co39 ; SccaReg 

LDA #$co 

STA $C039 

DEC $03F4 

JUMP ($FFFC) 
ÉRARRRRRRRRÉRÉRRRRRRRRRRR RAR RAR RRARRRRRRRRRARRRRRRR 
* * 
* ROUTINE PURGE.MEM # 
* Force le Memory Manager à purger les blocs * 
* purgeables et à compacter la mémoire * 
* en lui demandant un bloc mémoire supérieur * 
* à ce qu'il peut attribuer. * 
LA * 
RAR RÉ RNA RAR ARR 

MX #11 ; sous-routines démarrent 

; en 8 bits 

PURGEMEM CLC ; passe en 16 bits 

XCE 

REP #00110000 
* demande un nouvel identificateur 

PEA 4#$0000 

PEA ##00010000_ 00000000 ; idTag : applic 

LDoXx #52003 ; GetNewld 

JSL TOOLBOX 

PLA ; range l’identificateur 

STA :MY1ID 
* demande un bloc de 16 Mégas 

PEA #50000 

PEA #$0000 

PEA #$00FF ; taille du bloc : 

PEA #SFFFF ; 16 Mégas ! 

LDA :MY1ID ; notre identificateur 

PHA 

PEA ##00010011_ 00001000 ; application 

; niveau de purge 3 

PEA #$0000 ; LocationPtr : sans 

PEA #$0000 ; importance ici 

LDX #50902 ; Newhandle 

JSL TOOLBOX 

BCS 2ERROR ; erreur : toujours 
:ERROR PLA ; laisser la pile propre 

PLA 

LDA :MYID + désalloue la mémoire 

PHA ; de cet identificateur 

LDX #$1102 ; DisposeAll 

JSL TOOLBOX 
:END SEC ; retour en 8 bits 

XCE 

RTS 
:MYID DS 2,4$00 
RRRRRRRRRRRARARRRRRRRRRRRRARRRRRRRRRARRRRRARRRRARR 
* * 
* RECONFIGURATION DE LA BRAM. ai 
* Cette routine reconfigure la Ram Batterie * 
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À propos de la 
Transwarp 


Les sous-routines utilisées pour 
configurer la carte sont celles trouvées 
dans la documentation. 

J'ai du même coup trouvé un bug 
sérieux du “firmware” de ma carte : la 
sous-routine “ResetTW”, qui est 
censée remettre la TransWarp dans la 
configuration indiquée par l’utilisateur 
dans le tableau de bord de la 
TransWarp, plante purement et 
simplement. 

Pour voir si votre Transwarp a le 
même bug, passez sous Basic System 
et tapez : 


SCALL-151 
*<CTRL-N> (pour avoir des registres 
16 bits) 
*BC/FFOCX 
En revanche, je m'étais laissé dire que 
la routine d'identification de la 
Transwarp proposée par AE était 
fausse : elle marche impeccablement. 
À mon avis, certains doivent utiliser 
un assembleur qui n’est pas le bon. 
Vous trouverez les explications 
concernant l’option dite “Appletalk/ 
IRQ” de la Transwarp dans Pom’s 43 
pages 62-63. 


Présentation 
du listing 


La partie concernant les différents Quit 
en sortie n’a pas changé depuis Pom'’s 
41, prière donc de se reporter à ce 
numéro pour toutes explications. 

En revanche la partie “ModBram” qui 
modifie les réglages du tableau de 
bord, a subi quelques modifications du 
fait de son passage en sous-routine. 
Mais les explications de Pom’s 41 
suffisent. 

Le “noyau” central du programme est 
conçu de telle façon qu’on puisse lui 
rajouter d’autres sous-routines en 
fonction des besoins, ou supprimer ce 
qui n’est pas souhaité. Il suffit de 
supprimer les JSR correspondants, ou 
de les transformer en BIT. 


On peut patcher le code objet avec des 
$2C à la place des $20 en $202E et 
suivants. Pour un programme à 
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002135 : 
902136 : 
002137 : 


002139 : 
00213C : 


00213F 


002142 : 


002146 
002148 


00214A : 
00214D : 
00214F : 
002152 : 
002154 : 
002157 : 
002159 : 


00215C : 
00215E : 
002161 : 
002164 : 
002167 : 


00216B : 
00216D : 


00216E : 
002172 : 


002173 : 
002174 : 


002175 


002275 
002276 
002277 


002279 
00227D 


002280 : 


002282 : 


002286 


00228A 
00228B 
00228C 


> 
w 


002271 : 


5: 18 
: FB 
2 C2 


: AF 
: C9 


22 
2e 


F4 
: FB 
: 60 


94 


30 


00 
54 
08 


10 
24 


00 E1 


00 E1 


00 E1 


EA EA 


FF BC 
57 
=228A 


FF BC 
FF BC 


214 
215 
216 
217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 
250 
251 
252 
253 
254 
255 
256 
257 
258 
259 


260 
261 
262 
263 
264 
265 
266 
267 
268 
269 
270 
271 
272 
273 
274 
275 
276 
277 
278 
279 
280 
281 
282 
283 
284 


* sans passer par le tableau de bord du GS, 

* et fait prendre en compte la modification par 
* le GS. Pour que Prodos 16 et 8 reconfigurent 
* leur liste de “devices” aussitôt, lancer 

* ensuite un programme de type “Start” de P16 

* (voir l'étiquette Launch}). Cf Pom’s 41. 

* 

* 








FX % 15 m4 


RRRRRRRRRRRRRRRARARRR RAR ARR R RÉ RAR ARR tt 


MODBRAM 


:READBRM 


: CHGBRM 


:WRTBRM 


:SETBRM 


END 


:BRAMBUF 


MX 


DS 


#11 


ML 


D 


#00110000 


$0000 

: BRAMBUF 
#$0A03 d 
TOOLBOX 


#00110000 
#$00 
:BRAMBUF+$05 
#500 


:BRAMBUF+$1A ; 


#$50F 
:BRAMBUF+$1B 
#$50F 
:BRAMBUF+$1C 


#00110000 >; 
$0000 

: BRAMBUF 
#$0903 ; 
TOOLBOX 


#00110000 >; 


$E10094 ; 


256,4$EA 


sous-routines démarrent 


; en mode 8 bits 


passage en 16 bits 


lit la Bram 


: registres 8 bits 

; pas de buffer sur le 
; port 1 

; met l'affichage en 

; “écran Mac* 


registres 16 bits 
écrit la Bram 


registres 8 bits 

avec CLC, reconfigure 
les slots 

vecteur ToBramSetup 


; repasse en 8 bits 


Rhttihhitiittitétiéiéétéééitététééétééééététidétés 


* 


* TRANSWARP FAST : 


+ 


cette routine reconfigure la 
* carte accélérateur Transwarp GS d'Applied 
* Engineering pour tourner à sa vitesse maximum 


+ + + % 


RRRRARÉRRRÉRÉARÉRÉRÉRARÉAÉÉARARÉRÉRARRRRRRÉ ARR ER EE RÉ 


TWFAST 


END 


MX 


#00110000 


>$BCFFO00 ; 
#°TW’ î 
END 


SBCFF10 
$SBCFF24 


En 


; Assemblage 8 bits 


; passage en 16 bits 


vérifie la présence de 
là carte Transwarp 


GetMaxSpeed 
SetCurSpeed 


; repasse en 8 bits 
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publier dans une revue, cette formule 
me semble préférable à celle des “DO” 
à l’assemblage. 

C’est volontairement que ce 
programme-source n’inclut pas de 
macros : j'aime bien savoir ce que je 
fais, et cela le rend plus lisible. 
Utilisateurs, attention : ce que fait le 
programme est parfaitement invisible, 
tout se passe “dans la tête” de la 
machine. Seul le passage (à 
supprimer) en “écran Mac” donne un 
indice qu’il se passe quelque chose. Ce 
programme n’est pas à utiliser tel 
quel, mais à ajuster en fonction de 
votre configuration et de vos besoins. 
Et si vous y rajoutez d’autres 
sous-routines, envoyez-les nous. 


Le programme-objet correspondant au 
listing ci-contre... n'existe pas ! Il 
serait absurde, puisqu'il consisterait à 
défaire ce qu’il vient de faire. À la 
place, sur la disquette Pom’s, vous 
trouverez six fichiers correspondant 
aux six fonctions du programme, 
(PURGE.MEM, MODBRAM, TRANSWARP 
FAST, TRANSWARP SLOW, TW.IROQ 
. FAST, TW. IRO. SLOW). 


Références 


° Sur la partie “ModBram” et les 
divers Quit, voir Pom’s 41. 

+ Sur le Memory Manager et le 
Miscellaneous ToolSet, voir 
Toolbox Reference, volume 1, et 
la mise à jour Apple IIGS 
Toolbox Reference Update (pour 
RealFreeMem par exemple ; un 
indispensable). 

NB : pour avoir une synthèse 

complète et rapide des appels outils, 

plutôt que les deux volumes Apple de 

Quick Reference (C et Assembleur), je 

conseille le Programmer's OnLine 

Companion pour le C et le Pascal, 

Merlin 16 et ses ToolHelp (qu'on peut 

adapter pour APW) pour l'assembleur. 


° Sur la carte Transwarp GS : voir le 
“Programmer’s Reference”, inclus 
dans la documentation française. 


G 


00228D : 18 
00228E : FB 
00228F : C2 
002291 : AF 
002295 : C9 
002298 : DO 
00229A : A2 
00229D : 22 
0022A1 : 22 
0022A5 : 38 
0022A6 : FB 
0022A7 : 60 
0022A8 : 18 
0022A9 : FB 
0022AR : C2 
0022AC : AF 
0022B0 : C9 
0022B3 : DO 
0022B5 : 22 
0022B9 : 38 
0022BA : FB 
0022BB : 60 
0022BC : 18 
0022BD : FB 
0022BE : C2 
0022C0 : AF 
0022C4 : C9 
0022C7 : DO 
0022C9 : 22 
0022CD : 38 
0022CE : FB 
0022CF : 60 


+ 





30 


00 
54 
08 


01 


1c 
24 


30 
00 
54 
04 


34 


FF BC 
57 
-22A5 


00 
FF BC 
FF BC 


FF BC 
57 
-22CD 


FF BC 


286 
287 
288 
289 
290 
291 
292 
293 
294 
295 
296 
297 
298 
299 
300 
301 
302 
303 
304 
305 
306 
307 
308 
309 
310 
311 
312 
313 
314 
315 
316 
S17 
318 
319 
320 
321 
322 
323 
324 
325 
326 
327 
328 
329 
330 
331 
332 
333 
334 
335 
336 
337 
338 
339 
340 
341 
342 
343 
344 
345 
346 
347 
348 
349 
350 
351 
352 
353 
354 
355 
356 
357 
358 
359 
360 
361 
362 
363 
364 
365 
366 
367 


RARRÉRAR ANR ÉÉERRÉRÉRERRAÉRÉRAÉÉRRÉARARAARAR RER A 


TRANSWARP SLOW : cette routine reconfigure ia 
carte accélérateur Transwarp GS d’Applied 
Engineering pour tourner à 2,6 MHz (vitesse 
“rapide” du GS). 


W 4 % % 
WIN NO NURLÉ 


RRARRRAMERRAR RAR ARR ÉERRÉÉARÉÉRARÉ EN RÉE RÉ 


MX #11 ;: Assemblage 8 bits 
TWSLOW CLC ; passage en 16 bits 
XCE 


REP #00110000 


LDA  >$BCFFO0 : vérifie la présence de 


CMP #"TW’ ; la carte Transwarp 
BNE :END 
LDX #1 ; vitesse 2,6 MHz 


JSL $BCFF1C ; Index2Freq 
JSL $BCFF24 + SetCurSpeed 


:END SEC ; repasse en 8 bits 


FETE LIILILLIILLILLLILLILLLLLLILILLLILLELLEELLLLLELLLLLLE) 


* * 
* IROFAST : cette routine reconfigure la * 
* carte accélérateur Transwarp GS d’Applied * 
* Engineering pour ne pas se ralentir durant les * 
* interruptions. ki 
* * 
À L 


RARAARARRRRR RÉ ÉARRÉRRRRÉRRRARRRRRRRÉRRÉRARARR 


MX #11 ; Assemblage 8 bits 
IRQOFAST CLC ; passage en 16 bits 
XCE 


REP #00110000 


LDA >$BCFFOO : vérifie la présence de 
CMP #°TW” ; la carte Transwarp 
BNE 2END 


JSL $BCFF34 ; supprime le ralentisse- 
ment de la Transwarp 
durant les interruptions 


END SEC ; repasse en 8 bits 
XCE 
RTS 


hhtathhititétédatatététééétéatétéétététaététattés#x 


* 

* IROSLOW : cette routine reconfiqgure la 

* carte accélérateur Transwarp GS d’Applied 
* Engineering pour se ralentir durant les 
* 
* 
* 


M EME 5 


interruptions. 


PFTLLIIIILIILIIIIILILILILILLIILLLLILILLE ISLE L ELLE LLLLE:, 


MX #11 ; Assemblage 8 bits 
IROSLOW CLC ; passage en 16 bits 
XCE 


REP #00110000 


LDA >$BCFFO0 ; vérifie la présence de 
CMP #"TW’ la carte Transwarp 
BNE END 


JSL $SBCFF38 ; rétablit le ralentisse- 
; ment de la Transwarp 
durant les interruptions 


END SEC +: repasse en 8 bits 
XCE 
RTS 


héthététisététitétététééétététiéétééétitééétaéatéx 
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Comme le dit la sagesse populaire, un 
bonheur n’arrive jamais seul. 


Pom’s vous propose un joli doublé pour la 
rentrée 1989 : MacroTools.II et 
DeskTools.Il dans leur version 

française, qui viennent compléter une 
panoplie déjà impressionnante d’appli- 
cations TimeOut. Deux disquettes truffées 
de morceaux de choix. En voici un survol, 
à l’intention de tous les adeptes 
d’AppleWorks. 


MacroTools.Il 


Une vingtaine de macros fort diverses feront la joie des 
programmeurs, mais aussi de tous ceux qui se préoccupent 
moins du “comment ça marche” et souhaitent plus 
prosaïquement s’équiper d'outils “prêts à l'emploi”. 


Pour les premiers (par prédilection), deux macros tout à fait 

inédites : 

— une macro “Désassembleur”, qui traduit automati- 
quement n’importe quelle petite routine écrite en 
langage machine en “pokes” compréhensibles pour 
UltraMacros ; 

— une macro “ClavierInterdit”, qui détourne la fonction 
habituelle des macros <ato> pour en faire des 
sous-routines inaccessibles à partir du clavier et 
uniquement “appelables” par une autre macro, d’où un 
double avantage : aucun risque de déclencher par 
inadvertance une sous-routine malencontreuse, et 
disponibilité d’un jeu complet de définitions pour les 
sous-routines (qui ne feront jamais double emploi avec 
les macros à “part entière”). 


Pour les deuxièmes (mais non exclusivement, bien sûr), 
une macro d’impression de Traitement de textes sur deux 
colonnes, une macro de chaînage de Bases de données “en 
parallèle”, histoire de disposer de “pseudo-fiches” de 60, 
voire de 90 catégories 
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Dimitri Geystor 


Pour tout le monde, sans ostracisme, des macros pour caler 
la date et l’heure d’AppleWorks, avec et sans horloge. Et 
pour les possesseurs de GS, la saisie de l’heure à la seconde 
près. 


Des macros encore pour : 

— copier l’écran dans le presse-papiers ; 

— envoyer des codes à votre imprimante ; 

— utiliser l’imprimante comme une vulgaire machine à 
écrire ; 

— charger d’un coup toutes vos applications TimeOut 
même s’il y en a plus de 30, trouver sans douleur et 
précisément les coordonnées de tout point de l’écran. 


Parmi les fichiers de la disquette, vous trouverez aussi un 
tableau récapitulatif de toutes les macros UltraMacros déjà 
publiées dans Pom’s. 


Et -je réservais la bonne surprise pour le dessert- il n’y a 
pas que des macros sur cette disquette. Vous y trouverez 
aussi quatre mini-applications TimeOut inédites : 


®© Avec “Changer BIP” vous pourrez modifier rapidement 
et précisément le BIP d’AppleWorks. 


© Grâce à “Lister. Type” vous saurez lister sélectivement, 

avec AppleWorks, n’importe quel type de fichier (au 
lieu de vous heurter à la dénomination “autres” dont il 
affuble globalement tout ce qui n’est pas TAT, BdD ou 
Tableur). 


@ La mini-application “Références” vous donnera instan- 

tanément une “photographie” du statut actuel 
d’AppleWorks : lecteur actuel, nom d’accès ProDOS actuel, 
fichier actuel, nombre de fichiers sur le Bureau, occupation 
et type du Presse-papiers. 


@ L'application “Noms d’accès” est modeste par la 

place-mémoire qu’elle occupe, mais elle m’est vite 
devenue tout à fait indispensable : elle se présente sous la 
forme d’un écran, appelable par G-Escape, où vous pouvez 
inclure à l’avance (et en permanence par configuration, si 
vous le souhaitez), jusqu’à 12 noms d’accès ProDOS 
prédéterminés. Pour changer le “chemin actuel” 
d’AppleWorks, pointez et cliquez : imbattable en simplicité 
et en rapidité. 
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DeskTools.Il 


Il faut le dire tout de suite, le titre anglais “Accessoires de 
bureau” me semble pêcher par excès de modestie. La 
calculatrice scientifique/financière “Calculator+” est un 
authentique programme à part entière (même s’il est 
appelable à tout moment directement à partir 
d’AppleWorks, avec lequel il sait échanger ses données). 
Quant aux autres applications, il serait plus exact de les 
traiter de prolongements naturels d’AppleWorks, plutôt que 
d’accessoires, vu la connotation de futilité qui accompagne 
généralement ce dernier vocable. 


Mais jugez plutôt par vous-mêmes : 
Accès direct 


Vous avez des disques à forte capacité (3,5 pouces, ou 
disque dur), et malgré tout le soin que vous apportez à vos 
classements vous ne retrouvez pas toujours facilement tel 
ou tel fichier ? Vos soucis appartiennent désormais au 
passé : “Accès direct” se charge de tout. 


® “Accès direct” vous demande d’abord quel lecteur, ou 
quel catalogue vous voulez examiner. 


@ Il demande ensuite si vous voulez voir : 
— les fichiers AppleWorks seuls ; 
— tous les fichiers ; 


— les fichiers dont le nom contient une chaîne de 
caractères déterminée. 


Ces informations enregistrées, “Accès direct” fait son 
travail : il lit tout le catalogue avec tous ses sous- 
catalogues et affiche un superbe tableau de tous les fichiers 
désignés. Les fichiers des sous-catalogues sont indentés, et 
précédés d’un, de deux ou de plusieurs points correspondant 
aux “niveaux” de leurs sous-catalogues. 


Ce super-catalogue est imprimable, en entier ou par écrans. 
On peut aussi le faire défiler à l’écran avec la souris, vers le 
haut ou vers le bas, autant de fois qu’on le désire. 


De plus, les fichiers spécifiquement AppleWorks (TT, 
BdD ou Tableur) sont signalés en marge par une petite 
pomme. Il suffit de cliquer dessus, et aussitôt le fichier 
sélectionné est chargé sur le Bureau, tandis que son préfixe 
devient le “chemin actuel” d’AppleWorks ! 


Je n’en dis pas plus, c’est tout bonnement magique. 
pas p g1q 





Calculator+ 


Si vous voulez faire vos comptes d’épicerie sur cette 
calculette, ce n’est certes pas interdit, mais là n’est pas sa 
véritable vocation. 


I1 s’agit d’une calculette scientifique et financière à 
Notation Polonaise Inverse (NPI). Les opérations et les 
formules les plus complexes s’écrivent au moyen d’une 
petite pile de 4 variables. On met des données dans les 
variables, on leur applique une opération : le résultat passe 
au sommet de la pile tandis que les variables (dont on n’a 
plus besoin) sont purgées. Et ainsi de suite. Cela ne vôus 
rappelle rien ? Ce n’est pas autrement que procédaient nos 
grands-parents sur leurs bouliers. 


Sauf qu'ici, nous travaillons avec tout le confort de 
l'électronique, que nous pouvons choisir la base (décimale, 
hexadécimale), le format (jusqu’à 16 chiffres significatifs, 
nombre de chiffres après la virgule, notation scientifique), 
les fonctions (trigonométriques, exponentielle, logarith- 
mique, etc.), les options financières (amortissement, verse- 
ments, dépôt périodique ou global, valeur actuelle ou 
acquise). 


Les valeurs peuvent être introduites à la main, prélevées 
dans une cellule de Tableur, et “exportées” dans toute 
application AppleWorks. Les connaisseurs apprécieront. 


Chronomètres 


Cette application donne le meilleur d’elle-même sur le 
IIGS, car elle chronomètre à la seconde près. Elle 
fonctionnera aussi sur tout autre Apple // muni d’une 
horloge, avec un précision d’une minute. Vous n’avez pas 
d’horloge ? Désolé, attendez-moi un instant, on se retrouve 
à l’application suivante. 


© Vous disposez non pas d’un mais de cinq chronomètres, 

et pouvez mesurer jusqu’à cinq événements distincts. 
Chaque chrono donne l’heure du début, de la fin et le temps 
écoulé. 


© Vous pouvez même ajouter à chaque événement, une 

note explicative. Une fois les chronos démarrés, vous 
pouvez revenir à AppleWorks, et continuer ce que vous 
aviez à faire : le chronométrage continue. Vous pouvez, 
bien entendu, consulter à nouveau le chronomètre - ou 
l’arrêter à votre gré : il suffit de revenir à l’application par 
G-Escape. 


Éteindre écran 


L'écran s’obscurcit après un compte à rebours de quelques 
secondes. Pour le réactiver, appuyer sur une touche. 


Ah oui, il y a un petit “extra” : on peut configurer cette 
application pour que l’écran ne revienne que si vous tapez 
un code secret de votre choix. Tant pis pour les petits 
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curieux qui voudraient ausculter le travail en cours pendant 
que vous vous êtes momentanément absenté. 


Gérer imprimantes 


Avec cette application, vous pouvez envoyer tous les codes 
que vous voulez directement aux imprimantes définies dans 
AppleWorks. 


La configuration est très riche en possibilités. Vous 
décrivez les commandes (14 par imprimante), et leur 


attribuez les codes à envoyer (jusqu’à 10 octets par 
commande). 


À l'appel de l'application, il suffit ensuite de donner le 
numéro de la commande pour que celle-ci soit immédia- 
tement exécutée, c’est-à-dire transmise à l’imprimante en 
ligne. 


Ceci permet l’envoi à volonté de tous les codes simples 
(caractères gras, souligné, caractères par pouce, appel du jeu 
de caractères spéciaux, etc.), mais aussi une gestion 
complexe du travail de l’imprimante si vous en connaissez 
un peu les principes. 


La configuration est très simple à faire, et je me suis 
aperçu que cette application est un outil idéal pour tous les 
“travaux pratiques” indispensables quand on veut 
perfectionner sa propre compréhension du manuel d’une 
imprimante. 


Imprimer écran 


Une application toute simple mais extrêmement utile, En 
fait, elle permet d'imprimer (avec l’imprimante G-H) 
n’importe quelle partie de l’écran. On définit un bloc de 
texte avec les flèches (ou la souris), en le mettant en 
inverse vidéo. On valide : le bloc sélectionné est 
immédiatement imprimé. 


D'un emploi ultra-facile et intuitif. 
Prospecter fichier 


Voilà un outil très incisif : il permet la recherche d’une 
séquence de caractères dans des fichiers AppleWorks sur 


disque. 


Vous avez bien lu : la recherche porte sur le contenu des 
fichiers. L'application est donc d’une grande puissance, à 
vous de savoir bien la manier. La prospection se fait 
d’ailleurs à une vitesse surprenante, si l’on tient compte du 
fait que le contenu entier du fichier est passé en revue. 


La recherche en cours peut être nuancée : comme pour la 
fonction G-L d’AppleWorks, vous pouvez choisir “Texte 
brut” ou “Image exacte”; de plus, la chaîne indiquée peut 
être limitée —ou non— aux seuls mots entiers. Par 
exemple, si vous choisissez la chaîne “PAS”, l’application 
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retrouvera selon le cas uniquement le mot “pas”, ou aussi 
“passablement”, “dépassé”, etc. 


En cours de recherche, une fenêtre d’information s’affiche 
au milieu de l’écran. Elle indique le déroulement de la 
prospection : nom du fichier prospecté, type de ce fichier, 
chaîne cherchée, emplacement de chaque chaîne trouvée (le 
contexte est affiché). On peut à tout moment poursuivre, 
charger le fichier sur le Bureau, ou arrêter. En fin de 
recherche, un petit bilan s’affiche dans la fenêtre : nombre 
de fichiers prospectés, et nombre de correspondances 
trouvées. 


La grande classe, quoi. Et le grand confort ! 
Vérifier disque 


Cette application travaille en deux modes : Lecture simple, 
ou Lecture/Écriture. Elle lit un disque entier bloc par bloc 
(et le réécrit au fur et à mesure dans la deuxième option). 
Vous pouvez l’interrompre à tout moment par Escape. 


Si elle rencontre un bloc défectueux, elle le signale et fait 
une pause avant de continuer. 


À employer si vous n’arrivez pas à charger un fichier 
AppleWorks. Si aucune erreur n’est détectée, l’erreur est 
dans le libellé du fichier ou du catalogue. Si une erreur est 
détectée, le défaut est dans la disquette elle-même, ou dans 
les données du bloc. De toute façon, ce n’est pas drôle, 
mais un homme prévenu en vaut deux. 


Voir Presse-papiers 


Indique le type des données du presse-papiers, et montre son 
contenu à l’écran. 


Particulièrement utile si vous employez l’application 
Triple Presse-papiers de Randy Brandt, et n'êtes plus tout à 
fait sûr du contenu de l’un des presse-papiers : maintenant 
vous pouvez vous en assurer sans avoir à essayer de le 
copier dans un fichier (avec toutes les manipulations et 
fausses manœuvres qui vous menacent si vous tentez de 
copiez un presse-papiers dans un fichier de type 
différent.…). 


Non seulement le contenu du presse-papiers peut être 
consulté, mais il peut être sélectivement effacé (ligne à 
ligne pour du TAT, fiche à fiche pour une BdD, ligne ou 
colonne pour un Tableur). 
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Je vous propose aujourd’hui d’explorer certains compor- 
tements d’AppleWorks, et d’UltraMacros. 

Il sera question surtout de lecture et d’affichage de caractères 
à l’écran, dans le traitement de textes. 

À titre d'illustration, je montrerai comment l’on peut, sans 
trop de peine, créer avec UltraMacros de jolies fenêtres de 
messages à l'écran, avec caractères normaux, MouseText et 
même en inverse vidéo. (La disquette d'accompagnement 
optionnelle Pom’s 44 comporte le fichier Macro.Fenêtre 
prêt à l’emploi). 

Pour travailler à l’aise je vous recommande d’avoir sous la 
main le fichier de macros SuperPrint .um de Daniel Lurot 
(Pom's, n° 42), la disquette PathFinder de Randy Brandt (et 
plus précisément l’application TimeOut “Valeurs ASCIT” 
qu’elle contient). Ceci n’a rien d’obligatoire mais, à moins 
d'être masochiste, pourquoi travailler, comme on dit, avec 
“une main attachée derrière le dos” ? 

En cours d’article, j’expliquerai aussi pas-à-pas comment 
utiliser l'utilitaire Block.Warden de ProSel — à l’intention 
de ceux d’entre vous qui possèdent ProSel, l’emploient 
pour lancer des programmes, mais n’ont jamais osé s’en 
servir pour “éditer” un fichier. Il n’y a rien de sorcier 
là-dedans. 

Je vous recommande enfin de transformer vos fichiers 
SuperPrint.um en fichier Task, selon la méthode décrite 
dans mon précédent article, au moyen de l'application 
Macro Options. Ainsi, vous pourrez y accéder instan- 
tanément en cas de besoin. Quant aux petites macros qui 
émaillent l’article, avant le macro-programme proprement 
dit, vous pouvez soit les compiler toutes d’un coup (aucune 
ne porte le même nom), soit les compiler au fur et à 
mesure de votre lecture. 

Bon, j’en viens à mon propos. Faisons un peu d’explo- 
ration, en commençant par le plus banal. 


Le clavier 


Quand vous appuyez sur une touche, ou une combinaison 
de touches, un signal est envoyé à votre ordinateur sous la 
forme d’un code, dit code ASCII. C’est un nombre, de 0 à 
255 en notation décimale, ou de $00 à $FF en notation 
hexadécimale. 





Dimitri Geystor 


Le manuel d’UltraMacros contient, en dernière partie, une 
table des valeurs ASCII qu’il est commode de consulter 
d’un seul coup d’æil. Vous constaterez tout de suite que les 
caractères sont au nombre de 128 seulement, deux valeurs 
étant attribuées à chacun d’entre eux, une valeur “basse”, et 
une valeur “haute”. La différence entre l’une et l’autre est 
toujours de 128, ce qui correspond justement à la valeur du 
huitième bit d’un octet. 


Si vous avez “Valeurs ASCIT” sur votre menu TimeOut, 
appelez-le, et parcourez les divers codes en promenant la 
souris de gauche à droite. Puis faites “Return” deux fois, et 
tapez sur une touche ou une combinaison de touches : les 
codes correspondant s’afficheront aussitôt. 


L’écran 

Votre Apple II profite de cette double attribution de codes 
pour afficher les caractères de deux façons différentes : le 
mode “ordinaire” et le mode “inverse”. Si, de plus, votre 
Apple dispose des ROMS qui accompagnent le processeur 
65C02 (c’est le cas de toutes les machines récentes) il vous 
est possible d'afficher à l’écran un jeu de caractères 
supplémentaires “MouseText”. Si vous programmez en 
Basic Applesoft vous savez qu’il faut, pour activer et 
désactiver ce jeu de caractères, envoyer des codes de contrôle 


spéciaux. 


Les choses se passent autrement avec AppleWorks. 
Comment AppleWorks interprète-t-il le code envoyé par le 
clavier ? Et qu’affiche-t-il à l’écran ? AppleWorks fait un 
double filtrage à sa manière, de telle sorte qu’il est 
impossible à l’utilisateur de taper directement des caractères 
en Inverse ou MouseText. Ces caractères ne sont 
accessibles qu’à travers des routines internes. 


Pour toutes les valeurs ASCII basses comprises entre 32 
(Espace) et 126 (Tréma), Apple Works affichera à l'écran le 
caractère “normal” correspondant à (ASCII + 128). La 
valeur 127 correspond au “Delete”. 

Les valeurs “hautes” sont, pour AppleWorks, des 
commandes “G-”. Il y réagira s’il les reconnaît, ou enverra 
un “BIP” si elles lui sont inconnues. 
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Les commandes UltraMacros 
liées aux codes ASCII 





Key 


UltraMacros possède une commande qui permet de lire la 
touche qui a été enfoncée. C’est la commande <key>. 
Exemple : 
k:<awp 
msg “ Appuyez sur une touche ou un 
e combinaison de touches ”: 
k=key (attend qu’on appuie sur 
une touche) 
msg k>! (la valeur de la touche 
est dans la variable k) 


Quand vous actionnez cette macro, et que vous appuyez 
ensuite sur une touche ou une combinaison de touches, elle 
vous renvoie en message de bas de ligne le code ASCII 
correspondant, tel qu’envoyé par le clavier et reçu par 
AppleWorks. Essayez par exemple de taper “M”, et la 
valeur renvoyée sera 77 en décimal. C’est la valeur ASCII 
basse, ou valeur ASCII avec le huitième bit à zéro. Essayez 
maintenant la macro avec “ G-M”. La valeur renvoyée sera 
205 , soit 77 + 128. C’est la valeur ASCII haute, ou la 
valeur ASCII avec le huitième bit à 1 (le huitième bit vaut 
128). 

Compte-tenu de ce qui précède, vous voyez que <key> lit la 
touche telle qu’ AppleWorks l'interprète. 


Print 


Au lieu de taper un caractère au clavier, on peut l'envoyer à 
AppleWorks par la commande <print>. Exemple : 
pP:<awp 
print “M">! (élémentaire, 
Watson) 


mon cher 


On peut aussi d’abord définir une chaîne, puis imprimer la 
chaîne : 


qg:<awp 
$1="M" (on définit la chaîne) 
print $1>! (on l’imprime) 


Chr$, Asc $, Str$ 


Dans la macro ci-dessus, on aurait pu définir la chaîne à 
partir d’une valeur ASCII. L'intérêt d’une telle définition 
est qu’on peut envoyer à AppleWorks des commandes 
“G-quelque-chose” : 


r:<awp 
$i=chr$ 177 (177 = code ASCII pou 
EHoa-1) 
print $1>! (on envoie la command 


e à AppleWorks) 


Elle permet aussi de transmettre des touches. En général, 
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on ne change pas la valeur de k. Mais si l’on s’amuse, par 
exemple, à incrémenter k d’une unité, cela donne : 
f:<awp (Clavier fou. Quitter avec Esc) 
begin 
k=key ifnot k=27 
k=k+1 print chr$ k : rpt 
else stop >! 
Actionnez cette macro, et essayez de taper du texte. 


Revenons à la macro sa-r, et compliquons-la un peu, en lui 
faisant donner le code ASCII du caractère imprimé (la 
commande <asc $> lit la valeur ASCII du premier 
caractère d’une chaîne) : 


s:<awp 
$1="M” (on définit la chaîne) 
print $1 (on l’imprime) 
k=asc $1 (la variable k contien 
t le code ASCII de $1) 
msg k >! (k est imprimé en mess 


age de bas de ligne) 


La commande <str$>, quant à elle, transforme une variable 
numérique en chaîne de caractères. La macro ci-après 
imprime la caractère M et sa valeur ASCII : 


t:<awp 
$1="M” (on définit la chaîne) 
k=asc $1 (la variable k lit le 


code ASCII de $1) 
$2 = str$ k (on transforme la vari 
able numérique en chaîne) 
print $1+"="” + $2>1 (on imprim 
e 3 chaînes “concaténées‘”) 


Peek $10f5 


Cette commande analyse le caractère sous le curseur (dont 
AppleWorks conserve le code à l’adresse hexadécimale 
$10f5) et renvoie la valeur de ce code ASCII dans la 
variable numérique désignée. Exemple : 
c:<awp 
k=peek $10f5 (envoie le contenu de 
$10f5 dans la variable k) 
msg k>! (affich k en bas de ligne) 
Si le curseur était sur un “M”, surprise, ce n’est pas 77 
mais 205 (77 + 128) qu'’affiche le message. Eh oui, c’est 
ainsi, autant le savoir : la commande <peek S$10F5> 
renvoie la valeur haute du code ASCII du caractère sous le 
curseur. 


Poke $10f5,x 


Là, nous nous aventurons un peu. L'hypothèse étant : si 
<peek $10f5> lit la valeur du caractère sous le curseur, 
pourquoi ne pas bluffer AppleWorks en mettant une 
quelconque valeur ASCII dans cette mémoire ? Essayons : 
m:<awp 
k=193 (valeur haute de “A”) 
poke S$S10f5,k>1 
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Æh, mais Ça a l’air de marcher ! On actionne-la macro, et 
un “A” apparaît sous le curseur. Hélas, c’eût été trop beau. 
On a bien mis un caractère à l’écran, mais en prenant un 
raccourci, et AppleWorks n’est malheureusement pas au 
courant. À la première occasion, il réécrira par-dessus ce 
que lui, AppleWorks, est censé mettre à cet endroit. Faites 
Escape deux fois de suite, et pfuiit ! votre caractère de 
contrebande est envolé. 


Ne nous décourageons pas, et poursuivons notre 
exploration : du moment que <peekx $10f5> envoie la 
valeur haute du code ASCII, que se passera-t-il si nous 
faisons un <poke $10f5> avec la valeur BASSE ? 
Essayons : 


v:<awp 
k=65 (valeur basse de 
poke $10f5,k>! 


AT) 


Et voilà une jolie pomme. On ne peut pas l’effacer par 
Delete, mais elle disparaît si l’on écrit par dessus (même en 
mode insertion) et, comme tout à l’heure, elle s’évanouit 
définitivement au moindre “rafraîchissement” d’écran (par 
Escape ou défilement). 


Essayons de la capturer en la mettant dans la macro zéro 
($0) avec la commande G-/ : aïe, c’est “A” qui nous 
revient, bien permanent cette fois, mais ce n’est pas ce que 
nous voulions. 


Essayons de la copier avec G-C : elle s’envole aussitôt, 
avant même qu’on ait pu la saisir. 


Et pourtant, n’y a-t-il pas quelque chose à tirer de cette 
nature fugace ? Si seulement, au lieu d’afficher un seul 
caractère, on pouvait en afficher plusieurs, on tiendrait là 
une façon de mettre à l’écran (à l’endroit du curseur) des 
messages “propres”, qui disparaîtraient ensuite sans laisser 
de traces en restituant le texte qu’ils auraient 
éventuellement oblitéré. 


Eh bien, ça marche sans problème. Par exemple : 


u:<awp 
k=64 
begin 
poke $10f5,k right 
k=k+1 ifnot k=96 rpt else stop>! 


Mettez le curseur en début de ligne, et tapez sa-u pour voir 
s’afficher les caractères MouseText. 


De là, cependant, à pouvoir afficher commodément un 
message dans une fenêtre, avec la possibilité de modifier 
facilement et le message, et la position de la fenêtre, il y 


avait plus qu’un pas à franchir. C’est ce que fait le 
macro-programme que je vous présente en fin d’article. 


Mais avant de l’aborder je ferai un détour par Block.Warden, 
l'éditeur d’octets de ProSel, et pour ceux qui ne l’auraient 





pas, par SuperPrint.um (les macros de Daniel Lurot du 
n° 42 de Pom’s). Enfin, ceux qui n’ont même pas les 
macros SuperPrint.um trouveront quand-même en fin 
d’article la macro sa-$ de Daniel Lurot, qu’ils pourront 
recopier soigneusement à la main, compiler et utiliser pour 
introduire de façon permanente des caractères spéciaux 
(MouseText ou Inverse) dans un fichier de traitement de 
textes AppleWorks. 


En effet, s’il fallait par la méthode des <poke $10f5> créer 
une fenêtre (cadre composé en partie de caractères 
MouseText, et en partie de caractères ordinaires), et y 
mettre un texte qui contienne au choix des caractères 
ordinaires, MouseText ou inverses, la tâche serait fort 
laborieuse. De plus, il serait très difficile de modifier le 
texte du message. 


Or nous savons (depuis le n° 42 de Pom’s), que des 
caractères spéciaux peuvent être introduits de façon 
permanente dans un fichier TdT AppleWorks, et qu’alors ils 
sont copiables à volonté par la commande G-C. J’ai 
constaté en outre qu'ils étaient lus correctement dans tous 
les cas par la commande <asc $>. Il est donc possible de 
créer d’avance des chaînes composées de caractères mixtes, 
qui serviraient de modèle à celles du message à afficher ; il 
suffirait ensuite d'écrire une routine qui les lirait, caractère 
par caractère, avec la commande <asc $>. Créer ces 
caractères avec SuperPrint.um est un jeu d’enfant, je n’y 
reviendrai pas. Je dirai quelques mots par contre de l’emploi 
de Block.Warden, de ProSel. Si vous vivez (heureux ?) sans 
ProSel, sautez la partie qui lui est consacrée. 


Tant que vous êtes dans AppleWorks, créez un petit fichier 
de Tdt que vous nommerez Essai. Tapez-y trois fois de 
suite la ligne suivante, en changeant le numéro du début : 


1) àABCDEFGHIJKLMNOPQORST 
UVHAXYZ2 Nc le 


(avec un espace entre chaque caractère, et une ligne vide 
entre chaque ligne). 


Sauvez Essai, quittez AppleWorks. Vous êtes maintenant 
dans l’écran sélecteur ProSel. 


ProSel : À partir de l’écran de sélection principal, tapez les 
deux chiffres qui correspondent au Port et au Lecteur où se 
trouve la disquette qui contient le fichier Block.Warden. Par 
exemple 51 pour le Port 5, Lecteur 1. 


Vous verrez s’afficher une liste de fichiers-programmes (en 
majuscules) et de sous-catalogues (en minuscules). Si 
Block. Warden n’est pas visible, sélectionnez le sous- 
catalogue qui le contient (probablement “util”). 


Sélectionnez et validez Block.Warden. Il faut maintenant 
lui indiquer où est votre fichier Essai. Changez au besoin 
de disquette (Block. Warden reste en mémoire), et indiquez le 
préfixe ProDOS. Pour cela tapez sur la touche “P” : une 
fenêtre apparaît, avec un préfixe par défaut qui n’est sans 
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doute pas le bon. Tapez le préfixe voulu, en commençant 
bien par une barre oblique (/). 


Par exemple /travail/tdt/. Faites Return, et le préfixe 
actuel s’inscrira à gauche en haut de l’écran. Maintenant, 
tapez “F” pour appeler le fichier. Une fenêtre s’ouvre, avec 
“Follow/Info pathname”. Tapez le nom du fichier, sans 
barre oblique. Par exemple “Essai”. Faites Return. 


L'écran change aussitôt, et vous devriez y voir déjà des 
choses familières. Cet écran est divisé en deux parties : à 
gauche, les valeurs hexadécimales de tous les octets du 
fichier, à droite leurs équivalents en caractères ASCII. En 
haut à droite de l’écran, la mention “R/W mode”, c’est à 
dire mode Lecture/Écriture. On circule écran par écran, avec 
les flèches haut/bas. Un bloc occupe deux écrans. 


Tapez sur la touche “E”. En haut à droite, la mention est 
maintenant “Edit mode”. On circule caractère par caractère 
avec les flèches haut/bas et droite/gauche, et l’on fait passer 
le curseur au choix dans la partie droite ou gauche de l’écran 
avec la touche TAB. On ne peut éditer qu’un bloc à la fois 
(deux écrans). Pour revenir au mode R/W, taper Escape. 
Pour sauver les changements, taper W pour “write” suivi de 
Return, et valider avec la touche “Y”. 


Repérez, dans la partie droite de l’écran, les trois lignes de 
caractères que vous aviez tapées dans AppleWorks. Mettez 
le curseur sur le “à” de la première ligne, et faites TAB : le 
curseur saute à gauche sur le code hexadécimal 
correspondant, qui doit être 40. Tapez c0 (c’est à dire un c à 
la place du 4 et aussitôt après un zéro). Le curseur est 
maintenant sur la valeur 20, qui est le code hexadécimal de 
l’espace. Avec la flèche à droite, allez sur la valeur suivante 
qui est 41, et tapez c1. Continuez ainsi, en remplaçant les 
4 par des c, et les 5 par des d, jusqu’au dernier caractère de 
cette ligne du fichier AppleWorks, qui est 5f, et qui doit 
devenir df. Faites Esc pour revenir au mode R/W, tapez W 
et Return, suivi de Y. Le disque tourne, les modifications 
que vous avez apportées ont été enregistrées. 


Revenez au mode “Edit” avec la touche “E”, et modifiez les 
deuxième et troisième lignes de la même manière, mais en 
remplaçant les 4 et 5 par des e et f dans la 2ème ligne, et 
par des a et b dans la 3ème (donc, de e0 à ff, et de a0 à bf). 
Sauvez, et quittez Block.Warden en tapant “Q” suivi de “Y” 
pour confirmer. 


Lancez AppleWorks, chargez le fichier Essai, et admirez 
votre œuvre. Si vous n’avez pas fait de faute, les trois 
lignes sont devenues : 


RONLAVA=EE. JT dé 
REUGECENARMNNENTEE 
NEUBEENElMNISNTE 


ECRELISEC= | 9-52 | 


BERBUEUTAMENMENE 
BEORNSUEUTENEENENE 


666 666 
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En dépit des apparences, les lignes (2) et (3) ne sont pas 
identiques. Mais il est impossible de distinguer facilement, 
à partir d’AppleWorks, les caractères des séries (2) et (3). 
Une solution est de recopier le caractère à tester dans la 
macro suivante, de la compiler et de l’exécuter ; elle 
affichera le caractère spécial en inverse vidéo, et indiquera sa 
valeur ASCII en bas d’écran. 


W:<awp 

$1i="M” (définition de la chaîne) 

v=asc $1l (lecture de la valeur ASC 
II du ler caractère) 

n=v+128 (on inverse le 8ème bit) 

if n>255 n=n-256 elseoff 

poke S$10f5,n (on poke la nouvelle 
valeur) 

msg n>! (et on l'affiche aussi en 
bas d'écran) 


Voici les caractères qui correspondent à la série (3) : 


G) !"#$%&'()*+,-./0123456789:;< 
= >? | 


Devant le point d'exclamation, il y a un espace (non 
visible). 


Nous voici maintenant prêts à construire notre 
macro-programme. 


La première tâche est d’écrire les chaînes qui formeront la 
fenêtre. Elles logeront dans la sous-routine ba-2. Tapez ces 
chaînes au clavier, directement pour les caractères 
“normaux”, et avec la macro sa-$ de Daniel Lurot (donnée 
en fin d’article). Vous pouvez aussi copier caractère par 
caractère à partir des trois lignes obtenues avec 
Block.Warden. Si vous avez essayé l’un et l’autre, vous ne 
douterez pas de la supériorité écrasante de la macro. 


Pour changer le texte du message, il suffit de modifier les 
chaînes. Pour dépiacer la fenêtre, il suffit de changer les 
coordonnées dans la macro ba-1. 


La macro de démarrage ba-1 positionne le curseur au coin 
supérieur gauche de la future fenêtre, puis passe aux 
sous-routines. 


Note 1 : Les routines ba-3 et ba-4 utilisent la notation $(k) 
pour désigner les chaînes, où k est une variable que l'on 
incrémente : notation très pratique quand une série de 
chaînes doivent subir le même traitement. 

Note 2 : La partie if n > 255 n = n - 256 elseoffde 
la macro sa-v ci-dessus a été omise : on peut s'en 
passer, AppleWorks rétablit la valeur ASCII dont il a 
besoin. Dans la routine ba-4 on peut aussi mettre 
v=v-128, le résultat est le même. 
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Macro.Fenêtre 


START 


Macro principale : 


<ba-1>:<awp (repérages et mise en place 

du curseur) 

insert (mode insertion pour un cur 
seur moins voyant) 

G-up ba-left (curseur en haut à ga 
uche de l’écran) 

posn x,y (on note sa position) 

x=x+25 (coordonnées du coin supéri 
eur gauche...) 

y=y+6 (...de la future fenêtre) 

begin posn a,b down b=b+1 ifnot b= 
y rpt else (on descend de 6) 

begin posn a,b right a=a+l ifnot a 
=x rpt else (on avance de 25) 

ba-2 (lecture des chaînes qui cons 
tituent la fenêtre) 

ba-3>! (exécution de la fenêtre) 


Routines : 


<ba-left>:<awp (renvoi du curseur en dé 
but de ligne) 
c=0 
begin G-tab c=c+1 ifnot c=18 rpt>! 


<ba-2>:<awp (Définition des chaînes qui 
feront la fenêtre) 


S1=S “ 


S2=\) Exemple : Message | id 
$3="] en caractères Je 
S4=")] normaux, MouseText per 
$5="] et INVERSE pe 
$6="] RS 
>! (Fermons la macro) 


<ba-3>:<awp (boucle d'appel des chaînes 
successives) 
k=1 (k=1 pour la première chaîne) 


begin 
ba-4 down ba-5 k=k+1 ifnot k=7 rpt 
else down stop>! 


<ba-4>:<awp (boucle d'affichage tempora 
ire d’une chaîne) 


L=len $(k) (longueur de la chaîne) 

v=asc $(k) (lit la valeur ASCII du 
premier caractère) 

v=v+128(on rétablit le 8ème bit) 

poke $10f5,v right (on poke et on 
avance) 

L=L-1 ifnot L=0 $(k)=right $(k),L 
(on fait sauter le premier ca 
ractère de la chaîne) 

rpt>! (et on recommence la boucle) 


<ba-5>:<awp (curseur à la ligne, et au 


bord gauche) 
left posn x,y if x>a rpt>! 


Macros de saisie de 
caractères spéciaux 


(Daniel Lurot, Pom's n°42) 


$:<awp msg ‘Tapez le caractère désiré’: 


A = key msg ’’: 

if A<32 then A=32+A elseoff 
print chr$ A>< 

left:goto ba-M>! 


<esc>:<awp>;<left:goto ba-M>! 
<ctrl-v>:<awp>6<left:goto ba-M>! 
<ba-M> : <awp>< 


poke $800,$8d:poke $801,$08:poke $ 
802, Sc0: 

poke $803,$20:poke $804,$id:poke $ 
805, $6F: 

poke $806,$c9:poke $807,$81: 

poke $808,S$a0:poke $809, $12: 

poke $80a,$a5S:poke $80b, $82: 

poke $80c,$38: 

poke $80d,$ed:poke $80e,$00:poke $ 
80f,S$7c: 

poke $810,$a8: 

poke $811,$b9:poke $812,$02:poke $ 
813, $7c: 

poke $814,$49:poke $815, $80: 

poke $816,$99:poke $817,$02:poke $ 
818:$7cE 

poke $819,$20:poke $8la,$17:poke $ 
81b, $S6F: 

poke $81c,S$8d:poke $81d,$09:poke $ 
81e, $c0: 

poke $81f,S60: 

call $800><oa-Z oa-2>! 
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Seize millions sept cent soixante-dix sept mille deux cent 
seize octets, c’est ce que le 65SC816 de votre Apple IIGS 
peut adresser, soit 256 fois plus que ce dont était capable 
l’ancestral 6502. Pour gérer ces 16 Mo, le GS est doté 
d’une gestion de mémoire performante appelée Rom Tool 
02, ou Memory Manager. 


Le Memory Manager 


Dans le principe, le rôle principal du Memory Manager est 
de comptabiliser la mémoire de telle façon qu’en l’utilisant, 
un programme peut allouer ou désallouer des blocs de 
mémoire ainsi que changer leur taille pour satisfaire ses 
besoins. Le Memory Manager prend note de chaque 
utilisateur de chaque bloc de mémoire, afin de ne jamais 
donner plus d’une fois une zone de mémoire. 


Pratiquement, pour connaître à chaque instant l’état de la 
mémoire, le Memory Manager entretient une liste lui 
indiquant pour chaque bloc : 

°__ l’adresse de début du bloc ; 

+ le statut du bloc, (s’il est dynamique, effacable...) ; 

* _ l’utilisateur du bloc ; 

* la taille du bloc. 

C’est cette liste que peuvent vous donner le Memory 
Mangler, CDA fourni avec la Documentation Développeur, 
et le Memory Peeker, CDA installé dans les ROMSs version 
O1 (voir Pom’s 35 page 63). 


L’ID Tag Manager 


Pour être capable de reconnaître chaque utilisateur, le 
Memory Manager travaille avec l’ID Tag Manager, qui fait 
partie des Miscellaneous Tools (Tool 03). L'ID Tag 
Manager est utilisé pour assigner un identificateur (ID) à 
chaque programme en fonction de son type. Cet ID est 
composé de trois champs : 
®© Champ Type, 4 bits indiquant le type d'utilisateur : 

0 Memory Manager (Système, E/S, Affichage, 
RamDisk...) 
Application (GS.Paint, APW...) 
Programme de contrôle 
SOS (ProDOS 8, 16 ou GS.OS...) 
Tool (RamTools essentiellement) 
Accessoire de bureau (CDA, NDA) 


Un À © ND 
| 


> 0 © a 
WU NH 


BàF 


© © 


Patrice Neveu 


Bibliothèque (fichier RTL) 


System Loader 


Fonction du Firmware ou du Système 
Tool Locator (RomTool 01) 


Mise à jour (fichier STR) 


= Non-défini 


Manager. 


“e ? pour un GS 1 ,25Mo : 


$11 


$o2 | 


$o1 


$oo 


ROM du ][+, //e 
$FFFO000 


ROM, 128Ko 





Mémoire 
inexistante 


$E1C000 


RAM système, E/S 


affichage, et libre 
$E02000 





RAM inexistante 


i RAM pour un 
i GS 1,25Mo 


? RAM pour un 
GS 512Ko 


Champ Type Auxiliaire, 4 bits définis par l'utilisateur. 
Champ d'identification, 8 bits assignés par l’ID Tag 


j Bloc indiqué par le 


dernier handle de 
la liste. Regroupe 
le complément sur 
32 bits, les ROMs, 
la RAM existante, 
et $4000 octets 
du bank $E1 que le 
Memory Manager 
ne gère pas. 


Bloc contenant 
$2000 octets du 
Bank $EO non 
gérés par le MM 
et la RAM inexis- 
tante 


E ROMs sur 
carte-mère 


Puces sur car- 


RAM système, E/S Ü te d'extension 


affichage, et libre 
pile du système 





C) Puces sur 
carte-mère 


Schéma simplifié de l'utilisation 
de 1a mémoire du GS 
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En pratique 


Question : Comment se répartissent tous ces éléments dans 
ma mémoire ? 


Réponse : Faites G-Ctrl-Escape, selectionnez le CDA 
“Répartition de la Mev”, et conformez-vous aux 
indications inscrites en bas de l'écran du CDA. 

Question : J'en suis à l'affichage en pourcentage. Qu'en 
est-il ? 


Réponse : Les lignes ‘MEV utilisée’ et ‘MEV libre’ sont 
en poucentage de la Mev Totale. Les lignes Memory 
Manager, Applications jusqu'à Non-Défini sont en 
pourcentage de la MEV utilisée. La ligne RAM 
Disk est en pourcentage du Memory Manager. 


Au premier coup d’œil sur le schéma simplifié de la 
mémoire du GS, on a l’impression que tout est bien 
organisé. Certes, mais en fait, il ne faut pas oublier que ce 
schéma est simplifié à l’extrême et qu’en outre, deux 
particulatités, signalées par les accolades y sont 
remarquables. 


Pour expliquer le schéma, il faut dire qu’il y a une 
importante zone vide en plein dans la MEV, ainsi qu’entre 
les banks $E0- El et la ROM. Pour ne pas allouer le trou 
au milieu de la MEV à un utilisateur, le Memory Manager 
considère qu’il l’utilise. Il fait de même pour les ROMSs et 
l’espace les séparant du bank S$SE1. Allez-voir avec le 
Memory Peeker vous trouverez deux handles 
correspondants à des blocs énormes. 





Malheureusement, pour ce faire le Memory Manager 
n'utilise pas un bloc fictif allant de la fin de la MEV 
étendue jusqu’au début du Bank $EO, mais un bloc allant de 
la fin de la MEV étendue jusqu'à la page $20 du Bank $EO 
(SE02000), car les $20 premières pages du bank $EO0 sont 
réservées au système, et ne sont ainsi pas gérées par le 
Memory Manager. En conséquence, ce dernier mélange 
allègrement de la MEV réelle et de la MEV inexistante. 


De même, parce qu’il est impossible d’allouer une zone en 
ROM ou dans l’espace actuellement vide situé entre le bank 
SE1 et la ROM, le Memory Manager crée non pas un bloc 
allant de la fin du bank $E1 jusqu’en $FFFFFF (24 bits), 
mais un bloc partant de $00E1C000 jusqu’en $SFFFFFFFF 
(32 bits), car la zone SE1C000 à SE1FFFF est elle aussi 
réservée au système (E/S et carte langage). 


Remarquez qu’en considérant que la mémoire se termine en 
SFFFFFFFF, Apple se réserve ainsi une porte facile vers 
la compatibilité avec un processeur adressant 32 bits. 


Ces deux trous dans la mémoire sont bien évidemment pris 
en compte par le présent CDA, ainsi que les $6000 
($2000+$4000) octets réels ‘mélangés’ à la mémoire 
absente. 

Amusez-vous 

Il est très intéressant d’utiliser ce CDA sous différents 
environnements tels que APW, AppleWorks, GSPaint, un 
Quit ProDOS (8 et 16), l’AppleSoft, ProDOS 8, ProDOS 
16, GS.OS... 








Source RAM.USE.ASM 


Asml RAM.Use.CDA keep= RAM.Use 
Filetype RAM.Use CDA 
Exit 


Source MAKE.RAM.MAC 


macgen RAM.Use.CDA RAM.Macros /RAM5S/Macros/= 
RAM. Use.ASM 
Exit 


Source RAM.USE.CDA 











CECCELETEE TETE III TITI tanatatattsteeenee CLLLLLLLEL CELETELI IEEE CCTELEE ELLE TELE) 
* RAM.Use v1.6 
“ * 
* Permet d'afficher l'utilisation de 1a memoire geree par le Memory Manager, * 
* selon les 1Ds definis dans le ID Tag Manager des Miscellaneous Tools. cs 
+ 
+ 
« 


* 
CELLEELL EEE E LEE TION CELCEECLEEEPETONONNNNNNNNNNNNNNT TITI TITI) 


eo mn ee 0 me mm 0 


. em 
* Pour l'assemblage / linkage 


2 D 0 D 0 D D D mn À 


mcopy RAM.Macros 
keep RAM.Use 


ee 
* Bloc d'identification de CDA . 


À um 





CAR A EEE EEE AS AS 2 ee Ge Gr RE ME MERE LES ns ee ee re M ME EU EE Mn mn mr mm mme À 
RAM Use_Info Start 

str 'Repartition de la Mev' 
de 14'RAM Use StartUp' 

de 14'RAM Use_ShutDown' 


End 


DER 


RAM Use _StartUp Start 
using RAM Use_Data 


WndLft equ $20 
WndWdt h equ $21 
WndTop equ $22 
WndBtn equ 523 


First_Handie  gequ $00511600 


phb Sauve le banc de donnees de l'appeleur 
phk Car à sa place on met le notre, celui 
pib De notre banc de programme 


* Demande de combien on dispose de RAM, calcule la fin de la RAM et la RAM # 
* utilisee 


Pushlong £0 
_TotalMen 


Pulllong RAM Totale 


dx RAM Totale 
1dy RAM_Totale+2 


stx EORan 

dey Retire les blocks E0 6 El, pour savoir 
dey Se trouve le trou en RAM 

sty EORan+2 

Pushlong £0 Demande combien de RAM est libre 


_FreecMem 

Pulllong RAM Libre 
1da RAM Totale FAM totale - RAM libre = RAM utilisee 
sec 

sbc RAM Libre 
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sta RAM Utilisoe 
Ida RAM Totale+2 
sbc RAM Libre+2 
sta RAM Utilisee+2 





* Prepare le mode video et les marges qui lui conviennent au cadre 
re — + 


Place pour le resultat 
Mode video de la Battery RAM 


Pushkord £0 
PushWord £$19 
_ReadBParam 
Ida £52800 
pix 

beq Video40 
ora £$0014 
sta >$0020 


0 


+ Affichage du cadre CDA, et mise a jour des marges a l'interieur du cadre 


(RE à 


Pushlong £Cadre 
_NriteCString 
shortæ= 

1da £38 

sta >WndWith 
lds >NndLlft 
ina 

sta >WndLft 
Ida £5 

sta >NndTop 
lds £21 

sta >NndBt= 
longs 


WndTop= 6 & WndBtm= 21 


mm mm mm mm mm mm mm mm mme D 


+ Calcule les totaux par categories d'ID 


DR A SR Re PES . 
Res Initialise les variables....................ssussoscssccssssssssscsee 
Idy £4*12-4 Met toutes les Sires a 0 

1ds £0 
Clear_Sires sta Sires,y 

dey 

dey 


bpl Clear _Sires 
stz RAMDisk Site RAMDisk a 0 
stz RAMDisk_Sire+2 


stz Mode Mode 0= affichage des tailles en octets 


Jdx £<First_Handle Passe le ler handle 
1ldy £"First_Handle 
stx Bandle 

sty Bandle+2 
Pushlong Handle Transforme le handle en adresse 
Jar HndlToAdr 


Pu113 Adressetl Depile l'adresse 





shortæ 
pla Depile le 4eme octet (nul) 
Jongn 
Next_Maillon lady £6 Index pour lire l'ID 
jsr Read Maillon 
sta ID 
.e Indexation pour la table des tailles......................sss.ssssssus 
and £$F000 Garde le Type Field (nibble 4) 
1sr a Passe-le dans le nibble 3 (4321) 
ler a 
isr a 
1sr a 
xba Passe en bas (nibble 1) 
mp £$B Au ssus du type $A (SetUp File), tout 
bec Indexe Est considere comme $B (Non-Defini}, et 
lds £$B Ce, afin que l'affichage se fasse bien. 
Indexe esi a x2 
asl a x4 
tax Index pour mettre dans la bonne somme 
7 eo mm À 
ï * Cas special du Type 0 (Memory Manager) qui peut etre: * 
: maman mme mms « 
; * Memory Manager: type $0xxx / Statut S$xxxx * 
+ Li RAMDisk : $0001 $0008 e 
Là Le False RAM $0000 $Cco00 @ 
3 A me om mm mmmmmmmmmmememmmmmses À 
bne Read_Length 
Type_Nul 1ds ID 
beg Fuli_MM 
cmp £$0001 RAMDisk 


bne Read Length 
* Cas du RAMDisk 


ldy £$4 

jar Read Maillon 
mp £$0008 

bne Full MM 


Statut des blocs du RamDisk 
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idy £$8 

Jjsr Read Maillon 
cle 

adc RAMDisk Sire 
sta RAMDisk Sire 
php 

dy £$A 

jsr Read Maillon 
pip 

adc RAMDisk Sise+2 
sta RAMDisk_ Size+2 


bra Read Length 
.. Tester si l'on à atteind la limite de 1a Ram situee avant le bank $E0 
ldy £0 Lit l'adresse du bloc 
jsr Read Maillon 
cap EORan 
bne Read Length 
1ldy £2 
Jjsr Read Maillon 
mp EORam+2 
bre Read Length 
beq Try_Next 


Ca peut etre la fin de RAM ? 


Fin de RAM, alors passe 


Read_Length ldy £8 
jsr Read Maillon 


Index pour lire la longueur 


adc Sires,x 
sta Sires,x 


php Conserve la retenue 
1dy £$A 

jsr Read Maillon 

plip Recupere 1a retenue 


adc Sires+2,x 
sta Sires+2,x 


e… Passe au prochain maillon....., noces CPE EELEEE LES ELILLESI TELL ELITE) 
Try_Next 1dy 4510 

jsr Read Maillon 

tax 


APPLE EXPO STAND 118 


VOS APPLE TIC 
VOS APPLE IIE 
VOS APPLE II GS. 


N'EN REVIENDRONT PAS ! 


IIGS: Extensions mémoire (GS Ram et GS Ram Plus), 
Alimentation permanente (RamKeeper) 
Accélérateur 6.25 Mhz (TransWarp GS) 
Compatibilité MS-DOS avec PC-Transporter, 
Disque Dur interne 20/40/100 Mo Vulcan 
Co-processeur mathématique (FastMath) … 


mémoire, Alimentation permanente 
Disque Dur interne 20/40/100 Mo Vulcan 
Disque dur winchester. 3.5" externe 20 Mo 
Accélérateur 3,6 Mhz (TransWarp) etc … 


Extension 


Extension mémoire avec ou sans horloge et 
CP/AM, UniDisk 800K et kit de mise à niveau. 


TOUT LE MATERIEL APPLE II sur mesure: 
Apple II GS, LaserWriter, ImageWriter 11, 


LES MEILLEURS LOGICIELS pour Apple II à 


des prix U.S.A dont en exclusivité: 


AppleWorks GS, HyperStudio, AppleWorks 3.0 


BREJOUX.AE 
29 A rue Montribloud 69009 LYON 
Tel: 78.36.52.69 Fax: 78.25.50.84 
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Jdy £$12 

jer Read Maillon 
shorts 

sta Adresse+3 
longs 

stx Adresse+l 


* Verifie que ce maillon n'est pas le dernier 


ddy £$10 

Jjsr Read Maillon 
cmp £0 

bne Go_Nxt_Maill 
1dy £$12 

jsr Read Maillon 
cap £0 

beq Aff_Used RAM 


Necessaire car Read Maillon se termine 
Par un plx qui change : 


Voir les remarques precedentes 


Go_Nxt_Maill brl Next _Maillon 





… Affiche les tailles ainsi que la RAM utilisee et la RAM libre......... 
Aff_Used_RAM Ida MM_Sire Corrige tout d'abord la taille 

cle Utilisee par le Memory Manager en 

adc £$6000 Ajoutanc $6000 au total actuel 

sta MA Sire 

bce No_Carry 

inc MM_Sire+2 
No_Carry jsr Print_Liste Affiche la liste de types 





Attend la frappe de touche, et aiguille ou il faut................... 


Selectionne jsr Read_KBd 
cmp £$18 Escape= Quitter 
beq Sortie 
emp £$20 Espace= Changer d'affichage 
bne Selectionne 
LLL: 


Changement d'affichage....................esssssssssesssenensennnuse 


inc Mode Passe au mode prochain 

Ida Mode 

cmp £3 

bec Change Aff 

str Mode Repasse a rero 
Change_Aff jsr Print_Liste Affiche selon le nouveau mode 

bra Selectionne Et retourne attendre l'utilisateur 
Sortie plb Recupere le banc de donnees 

rti 

End 


“ 





tent mm mm à 

* Sous-Programmes: — Print_Liste 

- Read KBd . 

-— Read Maillon e 

KTab % 
. 
. 





- Tab 
- HndIlToAdr 


45% 
' 





eo et 2 0 D ee ee 


RAM_Use_Routines Start 
using RAM_Use_Data 


CORRE RE term sie + 
* Affichage dans le mode demande: Mode O= en octets . 
- Mode 1= en Ko 

® Mode 2= ent 

En msnmmasiemmnes em go ht ét qe li meme “ 
Print_Liste Entry 


ee Affiche la RAM totale en mode inverse dans la partie noire du cadre... 


lds Mode 


cap £2 
beg Aff_Tailles 


On n'affiche pas la RAM Totale en 4 


1ds £$011D 
jsr Tab 
PushWord £INV 
_WriteChar 


Affiche en inverse la RAM totale 


MoveLong RAM Totale, Bytes 
jar Print_Sire 


PushWord £ENORM 


_WriteChar Repasse en normal 
er Affiche les tailles.........s...s..sssssssmmsmemememeesessssssenmnnnes 
Aff Tailles MoveLong RAM Utilisee, Quotient 

1ds 1:55 

sta Byte 
Next_Sire ina Ajoute une ligne car on insere RamDisk 


Bonne Ligne 


EOTypes 





x4 


Movelong Sires,x, Bytes 
jsr Print _Sire 


dec Byte 
da Byte 

bmi EOTypes 
bne Next_Sire 
beg Bonne_Ligne 


Si on depasse 0, alors termine 
Si on n'est pas encore a rero 
Si on est à zero 


Affiche les totaux hors-liste..........sssssssssssescssesemreseuennss 


MoveLong RAM Totale, Quotient 


Ida £$111D 
jsr Tab 
MoveLong RAM Utilisee, Bytes 
jar Print _Sire 


Puis la RAM utilisee 


da £$121D Affiche la RAM libre 
Jjsr Tab 
MoveLong RAM Libre, Bytes 


jar Print_Sire 


Zlda £$0413 

jsr Tab 

MoveLong MM_Sire,Quotient 
MoveLong RAMisk_Sire, Bytes 
jsr Print _Sire 


Affiche enfin le RamDisk 


rts 


+ Aiguillage vers les differentes sous-routines d'affichage 


Print_Sire 


* Sous-routine 


Print_In_Bytes 


* Sous-routine 


Print_In_Ko 


+ Sous-routine 


Print_In_P 


lda Mode 

beg Print_In_ Bytes 
cap £1 

beq Print_In_ Ko 
bne Print_Ir_P 


d'affichage en octets 


Pushlong Bytes Numerateur 
Pushlong £Bytes_Str Buffer 
Pushhord £8 8 caracteres 
PushWord £0 Pas de signe 
_LongèDec 

Pushlong £Bytes_Str 

_NWriteCString 

rts 


d'affichage en FR 


Pushlong £0 
Pushlong £0 
Pushlong Bytes 
Pushlong £1024 
_LongDi vide 


Gbtenir des Ko. 


Pusklong £Quotient_Str _K 


Pushord £5 5 caracteres 
PushWord £0 Pas de signe 
_Lengèbec 


Pushlong £Quotient Sir _K 
_NriteCString 

pla Retire le reste de la division 
pla 


rts 
d'affichage en + 


Pushlong £0 
Pushlong £0 
Pushlong Bytes 
PushLong £100 
_LongMul 
Pulllong Bytes 
pla 

pla 


Octets x100 
Au maximum 16 Mo x100 tient dans 4 oct. 
Done un Long suffit 


Depile la partie haute (nulle) 


Pushlong £0 
Pushlong £0 
Pushlong Bytes 
PushLlong Quotient 
_LongDivide 


Pushlong £Quotient_Str_P 
PushWord £7 

PushWord £0 

_Long2Dec 


Pushlong £Quotient_Str P 
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_WriteCString 


pla Retire le reste de la division 
pla 


rts 





KBd equ $C000 

KBdSth equ $C010 

Read_KBd Entry 
1da >KBd Attente d'une frappe au clavier 
bpl Read_KBd On fait comme ca car malheureusement 
Ida >KBdStb _ReadChar derange les valeurs de Wnd... 
and £$007F Masque le caractere 
rte 






+ Lecture d'un maillon 


mme 


Read _Mailion Entry 

phx Sauve X qu'il ne faut pas perdre 

tyx On dit faire cette gymnastique car 
Entry 

Ida $112233,x L'indexage en y sur 24 bits n'existe pas 
plx Recupere X 


Adresse 


Efface la colonne actuelle, 


mme seems mm à 


* Tabulation: VTAB, ÆTAS . 


pla 





+ A partir du Handle qui est dans la pile, renvoie l'Adresse qui y correspond * 
+ dans la pile, en Long LS 


pèy 

phb 

lé $8,s 
short 


Sauve DB qui va etre modifie 
Haut du handle 


pha : Passe le haut du handle ds le registre E 


pilb + Pour aller lire directement 
longn 

1dy £0 

Ida (5,5),y 
tax 

1dy £2 

ide (9,5),y 
sta $B,s 
txa 

sta 9,3 

plb + Recupere DB a l'entree 
ply 
pix 
pip 
rts 


Lit le bas de l'adresse 


Lit le haut de l'adresse 
A mettre dans la pile 
Passe le bas de l'adresse dans la pile. 


DRE 


Recupere P 


End 


* Segment ShutDown du CDA _ 








RAM_Use_ShutDown Start 
using RAM Use_ Data 





rti 





* Donnees ‘ é 
… ee ee ee ee ee, ee, ee ee, ee ee me ee € 
RAM Use _ Data Data 

ee EE 4 CS * 
+ Codes de controle de l'affichage » 





d— 








CNORM equ 24 { caracteres normaux 

CSOUR equ 27 : souris 

LA 

NORM equ 14 + normal 

INV eq 15 + inverse 

LF eu 10 + descende d'une ligne 

FE eg 12 { equivalent de HOME 

CR equ 13 4 revient en debut de ligne 

EM eqgu 25 ; ramene le curseur en haut a gauche 
Fs equ 28 + deplace d'un caractere a droite 
BARH eg 76 4 L ($4C= 76) barre en haut 

BARD eg 30 4 Z ($5A= 90) barre a droite 
BARG eg 35 4 _ ($5F= 95) barre a gauche 








Cadre de i1'FF,CNORM, NORM',c' ",38c"_',c' 
de il'INV,CSOUR, BARD, CNORM, NORM',c' Utilisation de la MeV ‘ 
de il'INV',c' Tot: ", 11'CSOUR, BARG' 


de il'BARD',38i1'BARH',i1'BARG' 


dc il'BARD, CNORM, NORM* 

de c' Memory Manager , 
de 11'CSOUR, INV, BARG, BARD, CNORM, NORM' 

de ce dont RamDisk ( } : 
de il'CSOUR, INV, BARG, BARD, CNORM, NORM' 

de c' Applications LU 
de il'CSOUR, INV, BARG, BARD, CNORM, NORM" 
de c' Programmes de Controle 

de il1'CSOUR, INV, BARG, BARD, CNORM, NORM"' 
de c" Systeme d'exploitation " 
de 11'CSOUR, INV, BARG, BARD, CNORM, NORM" 

de c' Outils (RAM/ROM Tools) e 
de i1l1'CSOUR, INV, BARG, BARD, CNORM, NORM' 

de c' Accessoires de bureau > 
de 11'CSOUR, INV, BARG, BARD, CNORM, NORM" 

de c' Bibliotheques (RTL) 2 
de il1'CSOUR, INV, BARG, BARD, CNORM, NORM" 

de c' System Loader L 
de il'CSOUR, INV, BARG, BARD, CNORM, NORM" 

de c' Fonctions FirmWare/Systeme_ Le 
de i1'CSOUR, INV, BARG, BARD, CNORM, NORM" 

de c' Tool Locator 8 
de 11'CSOUR, INV, BARG, BARD, CNORM, NORM' 


de c' Mises a Jour (STR) * 
de il'CSOUR, INV, BARG, BARD, CNORM, NORM 
de c' Non-Defini D 


de 11'CSOUR, INV, BARG, BARD, CNORM, NORM" 
de 38i1'FS',i1'INV,CSOUR, BARG, BARD, CNORM, NORM 


de c' MeV utilisee_ e 
de i1'CSOUR, INV, BARG, BARD, CNORM, NORM" 


de c' MeV libre * 
de il'CSOUR, INV, BARG' 


de 11'BARD, CNORM, NORM', 38i1'FS',11'INV, CSOUR, BARG' 
de il'BARD, CNORM, NORM" 

de c' Quitter: escape Affichage: espace 

de i1'INV, CSOUR, BARG, CNORM, NORM" 


de c' ',il1'INV,CSOUR', 38i1'BARH',i1'CNORM, NORM', h'00" 


nr msnenmmene mens marre rneissrrreris peeeerseharers een ta ttes * 
* Variables s 
Re — —— — 2 ee de ne om me om on no ee M 
19 ds 2 
Mode ds 2 
Byte ds 2 
Byte_2 ds 2 
Handle ds 4 
Quotient ds 4 
Bytes ds 4 
Bytes Str ds 8 
de h'00" 


Quotient_Str_K ds 5 

de c' Ko',h'00" 
Quetient_Str_P ds 7 

de c'.',h'00" 


ds 4 
ds 4 Applications 
ds 4 Control Programs 
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ProDOS 

Tools 

Desk Accessories 

Run Time Libraries 

System Loader 

FirmWare / System Functions 
Tool Locator 

SetUp Files 

Undefined 


do dd de de de de de 


RAMDIsk Size Taille du RAMDisk 


ES 


RAM Totale 
EORam 

RAM Libre 
RAM Utilisee 


F6 & Ressesese 


à 


End 


Taille de la RAM instaliee dans le GS 
Fin de la RAM avant le Bank $E0 
Taille de la RAM installee restee libre 
Taille de la RAM installee occupee 


A XXXXXXXXXKXKXXANKANAXAXXNKAXAXKHAKKMXKKKAKKXKAKAKKKKKXENALARLARALLELARXAXX À 


* Informations 


*XXXXXXNKXXXKXAXKKKKXXKKXKAXAKKAXKKAXXAXKXKKKAXKKKKAKKANKAKKKKKNAAALKARAARAX À 


handle est en $E11600. Le format d'un maillon est le suivant: 


$00..03: Adresse du bloc memoire 

$04..05: Attributs 

$06..07: ID 

$08..0B: Longueur 

$0C..0F: Handle precedent (nul pour le premier maillon) 
$10..13: Handle suivant (nul pour le dernier maillon) 


LE LES Nés 


Les Handles sont enregistres dans une liste chainee. Le premier 


DRE Vas. 508 


RXXXXKKKKKMKXNKKKKKKXXAKKKNAAXKAKAKKARKAXKARKAXKAKKANAXAXKKNAKALKAXKKRAAAUX À 





Récapitulation RAM.USE 


Après avoir saisi ce code sous moniteur, vous le sauvegarderez par : 
create Ram.Use, 1$b9 
bsave Ram.Use, a$2000,1$c00, 1$b9 


2000:06 00 00 00 00 00 00 00 23 08 00 00 00 OA 04 
2010:00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 
2020:00 00 01 00 00 00 00 00 2C 00 40 00 20 20 20 
2030:20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 
2040:F2 DE 07 00 00 15 52 65 70 61 72 74 69 74 69 
2050:6E 20 64 65 20 6C 61 20 4D 65 56 1E 00 00 00 
2060:03 00 00 8B 4B AB F4 00 00 F4 00 00 A2 02 1D 
2070:00 00 El 68 8D 13 08 68 8D 15 08 AE 13 08 AC 
2080:08 8E 17 08 88 88 8C 19 08 F4 00 00 F4 00 00 
2090:02 1B 22 00 00 El 68 8D 1B 08 68 8D 1D 08 AD 
20A0:08 38 ED 1B 08 8D 1F 08 AD 15 08 ED 1D 08 8D 
20B0:08 F4 00 00 F4 19 00 A2 03 OC 22 00 00 El A9 
20C0:28 FA FO 03 09 14 00 8F 20 00 00 F4 00 00 F4 
20D0:03 A2 0C 20 22 00 00 El E2 20 A9 26 8F 21 00 
20E0:AF 20 00 00 1A 8F 20 00 00 A9 05 8F 22 00 00 
20F0:15 8F 23 00 00 C2 20 AO 2C 00 A9 00 00 99 DF 
2100:88 88 10 F9 9C OF 08 9C 11 08 9C B2 07 A2 00 
2110:A0 El 00 8E B8 07 8C BA 07 AD BA 07 48 AD B8 
2120:48 20 C7 03 E2 20 68 8D 9A 03 C2 20 68 8D 9B 
2130:E2 20 68 C2 20 A0 06 00 20 97 03 8D BO 07 29 
2140:F0 4A 4A 4À 4A EB C9 OB 00 90 03 A9 O0B 00 OA 
2150:AA DO 4A AD BO 07 FO 2D C9 O1 00 DO 40 A0 04 
2160:20 97 03 C9 08 00 DO 1D AO 08 00 20 97 03 18 
2170:0F 08 8D OF 08 08 AO OA 00 20 97 03 28 6D 11 
2180:8D 11 08 80 18 AO 00 00 20 97 03 CD 17 08 DO 
2190:A0 02 00 20 97 03 CD 19 08 DO 02 FO 1B AO 08 
21A0:20 97 03 18 7D DF 07 9D DF 07 08 AO OA 00 20 
21B0:03 28 7D El 07 9D E1 07 AO 10 00 20 97 03 AA 
21C0:12 00 20 97 03 E2 20 8D 9C 03 C2 20 8E 9A 03 
21D0:10 00 20 97 03 C9 00 00 DO O0B A0 12 00 20 97 
21E0:C9 00 00 FO 03 82 4D FF AD DF 07 18 69 00 60 
21F0:DF 07 90 03 EE E1 07 20 D7 01 20 89 03 C9 18 
2200:F0 18 C9 20 00 DO F3 EE B2 07 AD B2 07 C9 03 
2210:90 03 9C B2 07 20 D7 01 80 EO AB 6B AD B2 07 
2220:02 00 FO 29 A9 1D 01 20 AC 03 F4 OF 00 A2 OC 
2230:22 00 00 El AD 13 08 8D CO 07 AD 15 08 8D C2 
2240:20 9F 02 F4 O0E 00 A2 OC 18 22 00 O0 El AD 1F 
2250:8D BC 07 AD 21 08 8D BE 07 A9 O0B 00 8D B4 07 
2260:18 69 03 00 EB 09 1D 00 20 AC 03 AD B4 07 OA 
2270:AA BD DF 07 8D CO 07 BD El 07 8D C2 07 20 9F 
2280:CE B4 07 AD B4 07 30 04 DO D5 FO D4 AD 13 08 
2290:BC 07 AD 15 08 8D BE 07 A9 1D 11 20 AC 03 AD 
22A0:08 8D CO 07 AD 21 08 8D C2 07 20 9F 02 A9 1D 
22B0:20 AC 03 AD 1B 08 8D CO 07 AD 1D 08 8D C2 07 


01 
00 
20 
20 
6F 
E8 
22 
15 
A2 
13 
21 
00 
E9 
00 
A9 
07 
16 
07 
03 
00 
OA 
00 
6D 
08 
OD 
00 
97 
A0 
A0 
03 
8D 
00 
00 
c9 
18 
07 
08 
1A 
0A 
02 
8D 
1F 
12 
20 


22C0:9F 
22D0:07 
22E0:20 
22F0:AD 
2300:00 
2310:07 
2320:00 
2330:F4 
2340:F4 
2350:F4 
2360:F4 
2370:48 
2380:C0 
2390:00 
23A0:AD 
23B0:07 
23C0:00 
23D0:C0 
23E0:22 
23F0:07 
2400:A2 
2410:A3 
2420:00 
2430:0E 
2440:5F 
2450:5F 
2460:74 
2470:20 
2480:20 
2490:4C 
24A0:4C 
24B0:18 
24C0:72 
24D0:20 
24E0:20 
24F0:28 
2500:20 
2510:63 
2520:5F 
2530:1B 
2540:73 
2550:5F 
2560:18 
2570:6C 
2580:20 
2590:75 
25A0:6F 
25B0:20 
25C0:73 
25D0:5F 
25E0:1B 
25F0:71 
2600:5F 
2610:18 
2620:5F 
2630:20 
2640:6F 
2650:65 
2660:20 
2670:4C 
2680:5F 
2690:1B 
26A0:6F 
26B0:5F 
26C0:18 
26D0:5F 
26E0:20 
26F0:1C 
2700:1C 
2710:1C 
2720:74 
2730:5F 
2740:1B 
2750:5F 
2760:5F 
2770:18 


5F 
0F 
5F 


69 


5F 


sr 


53 


5F 


A2 


A2 


sr 


73 


SF 


SF 


sF 


5F 


AC 
08 
07 
07 
27 
00 
c2 
22 
A2 
22 
F4 
00 
68 
07 
0D 
00 
20 
co 
07 
22 
E1 
c2 
83 
5F 
SF 
SF 
74 
20 
5F 
4c 
4c 
6F 
5F 
20 
74 
20 
5F 
73 
20 
20 
6F 
20 
74 
69 
20 
28 
5F 
SF 
20 
20 
20 
52 
20 
74 
5F 
20 
6E 
65 
5F 
72 
20 
20 
54 
20 
2D 
SE 
20 
1C 
1C 
5F 
65 
20 
20 
5F 
20 
1C 


5F 
SA 


AD 
co 
07 
F4 
00 
60 
48 
00 
27 
00 
00 
0B 
F4 
AD 
00 
0B 
00 
29 
24 
48 
68 
A0 
AB 
5F 
5F 
20 
6F 
6F 
4C 
4c 
4c 
79 
5F 
1B 
52 
20 
18 
5F 
20 
72 
74 
20 
6D 
6E 
1B 
41 
5F 
18 
65 
20 
69 
4c 
20 
6D 
5F 
1B 
20 
65 
18 
5F 
20 
69 
29 
20 
65 
SF 
1B 
1c 
1C 
18 
5sF 
20 
65 
5F 
20 
120 


DF 


5F 


07 


5F 


sF 


sr 


1C 





20 
5F 


SA 











278010 ,10 1010.16 1CriIC 101CuCHHC IC TC IC ic\ic 
2790:1C 1C 1C 1C 1C 1C IC 1C OF 1B 5F SA 18 0E 20 51 
27A0:75 69 74 74 65 72 3A 20 65 73 63 61 70 65 20 20 
27B0:20 20 41 66 66 69 63 68 61 67 65 3A 20 65 73 70 
27C0:61 63 65 20 OF 1B 5F 18 0E 20 OF 1B 4C 4C 4C 4C 
27D0:4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 
27E0:4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 
27F0:4C 4C 18 0E 00 00 00 00 00 00 00 00 00 00 00 00 
2800:00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
2810:00 00 00 00 00 00 00 20 4B 6F 00 00 00 00 00 00 
2820:00 00 25 F1 45 00 00 00 F5 04 00 16 00 1E 00 F5 
2830:04 00 1A 00 E8 03 F5 02 00 30 00 13 08 F5 02 00 
2840:34 00 15 08 F5 02 00 37 00 13 08 F5 02 00 3A 00 
2850:15 08 F5 02 00 3D 00 17 08 F5 02 00 42 00 19 08 
2860:F5 02 00 53 00 1B 08 F5 02 00 57 00 1D 08 F5 02 
2870:00 5A 00 13 08 F5 02 00 5E 00 1B 08 F5 02 00 61 
2880:00 1F 08 F5 02 00 64 00 15 08 F5 02 00 67 00 1D 
2890:08 F5 02 00 6A 00 21 08 F5 02 FO 87 00 E9 03 F5 

28A0:02 00 8A 00 E9 03 F5 02 00 B9 00 DF 07 F5 02 00 GC; Per ] CAL L 
28B0:C0 00 OF 08 F5 02 00 C3 00 11 08 F5 02 00 C6 00 

28C0:B2 07 F5 02 00 CF 00 B8 07 F5 02 00 D2 00 BA 07 

28D0:F5 02 00 D5 00 BA 07 F5 02 00 D9 00 B8 07 F5 02 








28E0:00 DD 00 C7 03 F5 02 00 E3 00 9A 03 F5 02 00 E9 sg ee , 
28r0:00 SES 55" F4 00 07 02 F5 02 00 P7-00 20 L’objet de la présente commande est de simplifier l’usage 
2900:07 F5 02 00 0F 01 B0 07 F5 02 00 1C 01 97 03 F5 des préfixes ProDOS sous Basic.System. Le problème est 
2910:02 00 27 01 37 03 F5 02 00 2B 01 OF 08 F5 02 00 le suivant : 

2920:2E 01 OF 08 F5 02 00 35 01 97 03 F5 02 00 39 01 ; ; ; 

2930:11 08 F5 02 00 3C 01 11 08 F5 02 00 44 O1 97 03 Le programme Basic sur le disque dur se situe dans le 
2940:F5 02 00 47 01 17 08 F5 02 00 4F 01 97 03 F5 02 dossier /Ddur20M/En.Cours/ComptalVersion.2, dossier qui 
2950:00 52 01 19 08 F5 02 00 5C 01 97 03 F5 02 00 60 contient le sous-catalogue Donnees. Pour travailler dans ce 
2960:01 DF 07 F5 02 00 63 01 DF 07 F5 02 00 6A 01 97 : : : : 
2970:03 F5 02 00 6E 01 El 07 F5 02 00 71 01 El 07 F5 dernier dossier, il suffit de taper P Ls efix donnees, mais Poe 
2980:02 00 77 O1 97 03 F5 02 00 7E O1 97 03 F5 02 00 revenir au niveau précédent, il faudra taper Prefix 
2990:83 01 9C 03 F5 02 00 88 01 9A 03 F5 02 00 8E 01 /Ddur20M/En.Cours/Compta/Version.2… 


29A0:97 03 F5 02 00 33 01 97 03 F5 02 00 A4 O1 DF 07 : : : . 
29B0:F5 02 ON Dr 07 F5 02 00 B0 01 E1 07 F5 02 Les stakhanovistes du clavier apprécient, les autres, dont je 


29C0:00 B3 01 D7 01 F5 02 00 B6 01 89 03 F5 02 00 C3 fais partie, taperont simplement shortp. Moins 
29D0:01 B2 07 F5 O2 00 C6 01 B2 07 F5 02 00 CE 01 B2 impressionnant mais plus élégant. 

29E0:07 F5 02 O0Q D1 O1 D7 01 F5 02 00 D8 01 B2 07 F5 

29F0:02 00 E3 01 AC 03 F5 02 00 F0 01 13 08 F5 02 00 > 

2A00:F3 01 CO 07 F5 02 00 F6 01 15 08 F5 02 00 F9 01 En pratique 

2A10:C2 07 F5 02 O0 FC 01 9F 02 F5 02 00 09 02 1F 08 

2A20:F5 02 00 QC 92 BC 07 F5 02 00 OF 02 21 08 F5 02 





2A30:00 12 02 BE 07 F5 02 00 18 02 B4 07 F5 02 00 24 Vous rendrez cette commande externe ProDOS disponible 
2A40:02 AC 03 F5 02 00 27 02 B4 07 F5 02 00 2D 02 DF en tapant au clavier sous Basic : 
2A50:07 F5 02 O0 30 02 CO 07 F5 02 00 33 02 El 07 F5 
2A60:02 00 36 02 C2 07 F5 02 00 39 02 9F 02 F5 02 00 — shortp Ou brun shortp 
2A70:3C 02 B4 07 F5 02 00 3F 02 B4 07 F5 02 00 48 02 Vous pourrez également l'activer depuis un programme 
2A80:13 08 F5 O2 00 4B 02 BC 07 F5 02 00 4E 02 15 08 à 
2A90:F5 02 00 51 02 BE 07 F5 02 00 57 02 AC 03 F5 02 Basic par : 
2AA0:00 5A 02 1F 08 F5 02 00 5D 02 CO 07 F5 02 00 60 10 print chr$(4) "- shortp 
2AB0:02 21 08 F5 O2 00 63 02 C2 07 F5 02 00 66 02 9F 
2AC0:02 F5 02 00 6C 02 AC 03 F5 02 00 6F 02 1B 08 F5 à a 
2AD0:02 00 72 02 CO 07 F5 02 00 75 02 1D 08 F5 02 00 Dès lors pour raccourcir un préfixe, tapez au clavier : 
2AE0:78 02 C2 07 F5 02 00 7B 02 9F 02 F5 02 00 81 02 shortp ,ou dans un programme Basic : 
2AF0:AC 03 F5 02 00 84 02 DF 07 F5 02 00 87 02 BC 07 705 print chr$(4) "shortp 
2B00:F5 02 00 8A 02 E1 07 F5 02 00 8D 02 BE 07 F5 02 À 3 
2B10:00 90 02 0F 08 F5 02 00 93 02 CO 07 F5 02 00 96 Pour contrôler l’effet de la commande, demandez à 
2B20:02 11 08 F5 02 00 99 02 C2 07 F5 02 00 9C 02 9F Basic.System le préfixe courant en tapant : prefix 
2B30:02 F5 02 00 AO 02 B2 07 F5 02 00 AC 02 C2 07 F5 
2B40:02 00 BO 02 CO 07 F5 02 FO B4 02 C4 07 F5 02 00 C 
2B50:B7 02 C4 07 F5 02 FO C7 02 C4 07 F5 02 00 CA 02 
2B60:C4 07 F5 02 00 E1 02 C2 07 F5 02 00 E5 02 CO 07 
2B70:F5 02 FO F6 02 CD 07 F5 02 00 F9 O2 CD 07 F5 O2 
2B80:F0 09 03 CD 07 F5 02 00 OC 03 CD 07 F5 02 00 25 
2B90:03 C2 07 F5 02 00 29 03 CO 07 F5 02 00 3B 03 CO Source Shortp.src 
2BA0:07 F5 02 00 3F 03 C2 07 F5 02 00 50 03 C2 07 F5 Assembleur ORCA/M 
2BB0:02 00 54 03 cO 07 F5 02 00 58 03 BE 07 F5 02 00 
2BC0:5C 03 BC 07 F5 02 F0 67 03 D6 07 F5 02 00 6A 03 err on 
2BD0:D6 07 F5 02 FO 7A 03 D6 07 F5 02 00 7D 03 D6 07 65816 off 
65C02 off 


2BE0:F5 02 00 AO 03 B6 07 F5 02 00 AA 03 B6 07 00 00 
2BF0:00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 


absaddr on 
keep shortp 


org $2000 
main START 
; EQUATES: 
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longueur de l'instruction 
adresse de la ligne désassemblée 
adresse de départ pour move 


adresse de fin e # 
adresse d'arrivée " z 
pointeur temporaire 





out do gequ $DB5C 

insdsp2 gequ $F88C désassemble la ligne (pcl) 

move gequ $FE2C comme son nom l'indique 

: ProDOS et BASIC.SYSTEM: 

mli gequ $BF00 point d'entrée de ProDOS 

extrnemd gequ $BE06 saut vers commande externe 

errout gequ $BE09 affiche erreur et fin 

badcall gequ $BE8B convertit erreur MLI en BASIC.S 

getbufr gequ $BEFS réserve (A) pages sous BASIC SYS. 

xtrnaddr gequ $BE50 adresse commande externe 

xlen gequ $BE52 longueur de la commande 

xcnum gequ $BE53 n° de la commande 

pbits gequ $BE54 paramètres autorisés 

vpath1 gequ $SBE6C vecteur vers la commande entrée 

xreturn gequ $BE9E un RTS qui gagne à etre connu 

opencnt gequ $BE4D nombre fichiers ouverts 

long gequ fin-debut+$100 longueur du programme à reloger 
PS 

relogeur 


ST 


: initialisation 


nabcl 


init1 


init2 


gothen 


reloge 


nonactif 
nonactif,y 
outdo 


nabcl 


opencnt 
init2 
#$15 


errout 
extrnomd+2 
precmd+2 
extrnomd+1 
precmd+1 
#>long 
getbufr 
#50C 
gothen 
errout 


adresse 
a4+1 
extrnomd+2 
#>debut 
el+1 
#<fin-1 
a2 

#>fin-1 
a2+1 

#0 

ad 

al 
extrnoemd+1 
move 
reloge 


adresse 
pcl+1i 


Relogeur honteusement copié sur celui de Sylvie GALLET, qui 
à elle-meme copié celui de POM's n° 26 


est-ce un JMP ? 
oui 
non -> affiche message et fin 


ÿ a-t-i1 des fichiers ouverts ? 
non 

oui -> impossible placer la comma 
nde message FILE(S) STILL OPEN 


sauve adresse de la première 
commande externe 


demande d'un buffer de (A) pages 


erreur ? 

non 

oui -> affiche 
BLE' et fin 

n° de la 1-ère page accordée par 
ProDOS 


‘NO BUFFERS AVAILA 


les adresses départ et arrivée 
sont alignées -> poids faible = 0 


déplace le programme 


adresse de relogement 





lda #0 æ 
sta pcl " 
rdecode ldx #0 nécessaire pour insdsp2 
Ida (pcl,x) 
beq rfin si 00 séparant progrmm et données 
jsr insdsp2 
1dy length Y = longueur instruction - 1 
cpy #2 instruction sur 3 octets ? 
bne rsuivant non -> pas de changement 
ida (pci),y oui 
cmp #>mli est-ce un appel au MLI ? 
bne nomli non 
dey peut-etre... 
Ida (pcl),y 
cmp #<mli 
bne nomli non 
dey 
Ida (pcl),y 
cmp #$20 est-ce un jsr ? 
bne nomli non 
Ida pci oui -> avance pci de 3 octets et 
cie traite les 3 octets suivant jsr $ 
BF00 
adc #3 comme une instruction à reloger 
(l'adresse du buffer n'a pas beso 
in d'etre relogée) 
sta pcl 
bcc nomli 
inc pcl+1 
nomli Ida pcl passage de paramètres pour calcul 
sta adr 
Ida pcl+1 
sta adr+1 
ldy length 
jsr calcul 
rsuivant lda length on passe à instruction suivante: 
sec avec pcl = pcl + length 
adc pcl 
sta pcl 
Ida pcl+l 
adc #0 
sta pcl+1 
sec distance (pcl) - adresse stockée 
sbc adresse dans À (MSB) et X (LSB) 
dx pcl 
jsr test distance >= long du programme ? 
bcs rfin oui -> on a fini 
jmp rdecode non 
rfin rts 
test cmp #>fin-debut À < nbre de pages du programme ? 
bcc oui oui 
bne non non et À > nbre de pages -> en de 
hors du programme 
cpx #<fin-debut on est dans la dernière page: 
; X < poids faible de fin ? 
bcs non non -> en dehors du programme 
oui clic dans les limites 
rts 
non sec 
rts 
calcul dey 
lda (adr),y partie basse de l'opérande 
tax 
iny 
lda (adr),y partie haute de l'opérande 
sec 
sbc #>debut écart (en pages) entre adresse et 
début 
bec nonc écart < 0 -> opérande en dehors d 
es adresses à modifier 
jsr test écart >= 0 -> écart > longueur du 
; programme ? 
bcs nonc non 
adc adresse oui -> on reloge 
sta (adr),y 
clic 
rts 
nonc sec 
rts 
adresse ds 1 adresse début du programme relogé 
ds SFF-(adresse-init) debut sera égale à $2100 
=== === MM MR EEE RM MMS SES SMS SE 
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î 


JO ESS SSSEMRBRRES EEE EEE S SM 


debut 


compare 


cmdok 


versuite 


nocmd 


ñ 


precmd 


nu 
u 


xsuite 


erreur 


ok 


‘ 


boucle 


end 
rien 


Programme à reloger 





ida vpath1 
sta ptr 

Idä vpath1+1 
sta ptr+1 
ldy #1 

Ida (ptr),y 


Ccmp commande-1,y 


bne nocmd 
iny 

cpy #7 

bcc compare 
Ida (ptr),y 
cmp #$0D 
beq cmdok 
jsr $DAFB 
ida #$10 
jmp errout 
dey 

dey 

sty xlen 
Ida #0 

sta xcnum 
sta pbits 
sta pbits+s1 
Ida xsuite 
Ida versuite+1l 


sta xtrnaddr 


Ida versuite+2 


sta xtrnaddr+1 


sec 


jmp xreturn 


Lecture du préfixe: 


ssssssssmem———— 


lda buffer 


lda xsuite+1l 
sta table+1 
Ida xsuite+2 
sta table:2 
jsr mif 

de 11"$c7" 
de i2'table' 


bcc ok 

jsr badcall 
Jjmp errout 

ldy buffer 

beg end 


dey 

Ida buffer,y 
cmp #'/" 

bne boucle 
sty buffer 
jsr mli 

dc i1'$Ccé6" 
dc 12'table' 
bec end 

jmp erreur 
rts 

ds 1 





S=S==s2sme2e==- 








vpathl pointe sur la commande 
entrée 


analyse de la commande tapée 
pas "shortp" 


longueur "shortp" + 1 


envoie un retour chariot 
code de "SYNTAX ERROR" 


n° commande externe 
aucun paramètre autorisé 

" “ " 
utile au relogeur seulement 
adresse de retour de ProDOS après 
examen 
des paramètres 


retour à ProODS pour analyse des 
paramètres 

suivant éventuellement la command 
e tapée 

utile si notre cde est la seule 
ou la dernière pour signaler l'er 
reur 

saut à la commande externe 
précédente 


utile pour le relogeur (permet de 
reloger l'adresse buffer utilisé 
pour lire préfixe) 


GETPREFIX 
table des paramètres utilisés pou 
r GETPREFIX 


affichage de l'erreur 

longueur du préfixe actuel 

si longueur = 0 inutile de raccou 
rcir le 

préfixe 

le dernier caractère est "/" donc 
inutile de le relire 


longueur du nouveau préfixe 


SETPREFIX 
la meme table que pour GETPREFIX 


en principe "PATH NOT FOUND" 


le relogeur l'apprécie 


; Table de paramètres et message: 








table 


buffer 
commande 


nonactif de 


fin 











de i1'"1' 

dc i2'buffer' 
ds 64 

dc c'SHORTP' 





11125,13,13, 7" 





1 seul paramètre 
zone de stockage du préfixe 


dc c'#* FITCA NON SODORP **' 


anop 
END 
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Récapitulation Shortp 


Après avoir saisi ces codes sous 
moniteur, vous les sauvegarderez par : 
bsave shortp, AS$2000,LS$1E8 


2000:AD 00 BF C9 4C FO OD AC 
2008:CE 21 B9 CE 21 20 5C DB 
2010:88 DO F7 60 AD 4D BE FO 
2018:05 A9 15 4C 09 BE AD 08 
2020:BE 8D 4A 21 AD 07 BE 8D 
2028:49 21 A9 01 20 F5 BE C9 
2030:0C DO 03 4C 09 BE 8D E2 
2038:20 85 43 8D 08 BE A9 21 
2040:85 3D A9 E7 85 3E A9 21 
2048:85 3F A0 C0 84 42 84 3C 
2050:8C 07 BE 20 2C FE 20 5A 
2058:20 60 AD E2 20 85 3B A9 
2060:00 85 3A A2 00 A1 3A FO 
2068:50 20 8C F8 A4 2F CO 02 
2070:D0 2C B1 3A C9 BF DO 19 
2078:88 B1l 3A C9 00 DO 12 88 
2080:B1 3A C9 20 DO OB A5 3A 
2088:18 69 03 85 3A 90 02 E6 
2090:3B A5 3A 85 FC A5 3B 85 
2098:FD A4 2F 20 C8 20 A5 2F 
20A0:38 65 3A 85 3A A5 3B 69 
20A8:00 85 3B 38 ED E2 20 A6 
20B0:3A 20 BA 20 BO 03 4C 63 
20B8:20 60 C9 00 90 06 DO 06 
20C0:E0 E8 B0 02 18 60 38 60 
20C8:88 B1 FC AA C8 B1l FC 38 
20D0:E9 21 90 OC 20 BA 20 BO 
20D8:07 6D E2 20 91 FC 18 60 
20E0:38 60 00 00 00 00 00 00 
20E8:00 00 00 00 00 00 00 00 
20F0:00 00 00 00 00 00 00 00 
20F8:00 00 00 00 00 00 00 00 
2100:AD 6C BE 85 FE AD 6D BE 
2108:85 FF AO 01 B1 FE D9 C7 
2110:21 DO 34 C8 C0 07 90 F4 
2118:B1 FE C9 OD FO 08 20 FB 
2120:DA A9 10 4C 09 BE 88 88 
2128:8C 52 BE A9 00 8D 53 BE 
2130:8D 54 BE 8D 55 BE AD 4B 
2138:21 AD 37 21 8D 50 BE AD 
2140:38 21 8D 51 BE 18 60 38 
2148:4C 9E BE AD 88 21 AD 4C 
2150:21 8D 86 21 AD 4D 21 8D 
2158:87 21 20 00 BF C7 85 21 
2160:90 06 20 8B BE 4C 09 BE 
2168:AC 88 21 FO 16 88 B9 88 
2170:21 C9 2F DO F8 8C 88 21 
2178:20 00 BF C6 85 21 90 03 
2180:4C 62 21 60 00 01 88 21 
2188:00 00 00 00 00 00 00 00 
2190:00 00 00 00 00 00 00 00 
2198:00 00 00 00 00 00 00 00 
21A0:00 00 00 00 00 00 00 00 
21A8:00 00 00 00 00 00 00 00 
21B0:00 00 00 00 00 00 00 00 
21B8:00 00 00 00 00 00 00 00 
21C0:00 00 00 00 00 00 00 00 
21C8:53 48 4F 52 54 50 19 0D 
21D0:0D 07 2A 2A 20 46 49 54 
21D8:43 41 20 4E 4F 4E 20 53 
21E0:4F 44 4F 52 50 20 2A 2A 
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Voici quelques considérations sur la mise 
à jour des fenêtres des programmes 
typiquement GS et une routine bien utile à 
l’écriture des applications. 

A titre de démonstration, une application 
GS figure sur la disquette qui accompagne 
optionnellement ce numéro elle vous 
permettra de lire les sources et fichiers de 
type TEXT. 


Programmant depuis quelques temps sur Apple IIGS, je me 
suis heurté sur le fait de faire défiler du texte rapidement 
dans une fenêtre graphique. Beaucoup de programmes 
d'amateurs sont désespèrement lents, et je pensais cet état de 
chose normal, jusqu’au jour où j’ai vu ce que pouvaient 
faire les professionnels... 


Je me suis donc penché sur le problème et après avoir 
décortiqué le déroulement des mises à jour, j’ai écrit cette 
routine qui pourra rendre service à un certain nombre de 
lecteurs programmeurs, où leur donner des idées pour faire 
mieux. 


Défilement rapide de texte 
dans une fenêtre 


La mise à jour d’une fenêtre (Update Event) survient dans 

plusieurs cas : 

-__ clic dans une barre de défilement horizontal ou vertical ; 

* changement de la taille d’une fenêtre (avec une 
exception) ; 

° fermeture d’une fenêtre sur la fenêtre à mettre à jour (par 
exemple, fermeture d’un accessoire de bureau). 


Une procédure de Quickdraw nous permet de connaître la 
taille du rectangle à mettre à jour, c’est GetPortRect. 


Dans notre procédure, il faut donc : 

1 Sauvegarder les valeurs du rectangle telles qu’elles 
nous avaient été retournés par GetPortRect la 
mise à jour précédente ; 

2 Récupérer les nouvelles valeurs de GetPortRect ; 

3 Faire une analyse des changements intervenus ; 

4 Redessiner uniquement ce qui a pu être €ffacé. 


Patrick Desnoues 


La fenêtre n’est pas active 


Il faut la redessiner de al à ci. 
La fenêtre est active 


= Si la taille de la fenêtre n’a pas 
changé 


X C’estun clic sur 


- Le texte monte; 
- le Window manager déroule vers le haut ce qui est à 
l'intérieur. 





- al >c: redessiner tout l’écran de al à c1 ; 
- _al<c:redessiner dcàcl. 
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X C’estun clic sur T 


- Le texte descend ; 
- le Window manager déroule vers le bas ce qui est à 
l’intérieur. 


LA TRONE 


QU'UNE FENETRE AVEC DES 
(sc ENSEURS SANS RIDEAU 
C'EST (WA, RIDICULE 





L._: 


- Cl <a : redessiner tout l’écran de al à cl ; ci 
- C12>a : redessiner de al à a. 


b d 
LL bn sil 
Le rétrécissement complet de la fenêtre est le seul cas qui 


X C’est un clic sur <— ou — n'entraîne pas de mise à jour. Ce qui est contenu dans la 


plus petite fenêtre tenait forcément dans la grande et n’a pas 


X 2ème cas 


Sn |ca|nn 





Flèche — : 
- soit redessiner de a/b1 à b/c1 (le plus rapide) ; 
- Soit redessiner de a à c (le plus simple). 





Il faut redessiner de c à c1. 


X 3ème cas 


- soit redessiner de al1/d à d1/c1 (le plus rapide) ; 


- Soit redessiner de a à c (le plus simple). 





” La fenêtre a changé de taille 


X lercas 
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-  Redessiner de a1/d à c1/d1 ; 
- ou, plus simple, de al/b1 à c1/d1. 


X 4ème cas 
à 25-41 





La fenêtre a été agrandie. Il faut : 
- soit redessiner de a1/d à c/d1 et de b/c à cl/d1 ; 
- soit, plus simple, de a1/b1 à c1/d1. 


Programmation 


Il suffit de : 


- créer une fenêtre avec des barres de défilement ; 

- dans les paramètres de la fenêtre indiquer ’ dc 
i4’Procedure”’ dans le paramètre concerné ; 

- stocker le numéro de la fenêtre retourné par New 
Window dans la variable ‘ AideWRefCon' ; 

- stocker l’adresse du texte à afficher dans la variable 
<Texte’ ; 

- stocker la longueur du texte à afficher dans 
‘’<LongTexte’ ; 


Fichier Scrolling 


START 

Using Ressource 
Using Datas 

Jsr SP _SFGetFile 
Usr LoadFichier 
Rts 

hammam mm STANDARD GETFILE 
SP_SFGetFile Anop 
Pushword #120 


Scrolling 


Position Horizont. 


Pushword #50 Verticale 

Pushlong #D SFGetFile Titre 

Pushlong #0 Filtre 

Pushlong #NombreTC Type accepté 

Pushlong #GoodsC Réponse 

_SFGetFile 

Rts 
Re cc ee ee ee 
LoadFichier Anop 

Lda GoodsC OK ? 

Bne OpenFichier 

Rts Non on annule 
panamammmnmennnnmsnnns nee mins 
OpenFichier Anop 





C’est tout. 


a = AncienHaut al = NouveauHaut 
b = AncienGauche b1 = NouveauGauche 
c = AncienBas ci = NouveauBas 

d = AncienDroit di = NouveauDroit 


On peut encore optimiser la vitesse en calculant uniquement 
les mises à jour des scrolling horizontaux (comme cela est 
défini ci-dessus, mais non traité), mais pour l’affichage d’un 
texte standard, le jeu ne vaut guère le coût. 


Une application 


Sur le disque Pom'’s, vous trouverez l’application 16 bits 
“Turbo.Scroll’ à titre de démonstration. 


Le programme a été écrit sous APW. Il permet de charger à 
partir d’un disque ProDOS des fichiers de type Text (T$04) 
ou Sources (T$BO). Après la transformation des minuscules 
accentuées adaptée à la langue française, le texte apparaît 
dans une fenêtre graphique avec une vitesse de défilement 
défiant pratiquement toute concurrence. 


Les fichiers sur disque : 
Turbo.Scroll l’application GS ; 
Librairie équivalences et page zéro ; 
Data données et chaînes de caractères ; 
MainPoms initialisation, boucle principale, ferme- 
ture et Quit ; 
Scrolling tout ce qui à trait a cet article ; 
FatalErreur gestion des erreurs ; 
LinkAII fichier Exec qui assemble le tout. 
Pushzera Handle Libère 1a place 
_DisposeHandle du fichier 
_Open D OpenParm Ouverture fichier 
Bcc NoErrl 
Jmp ErreurOF 
NoErrl Anop 
Lda RefNum 


Sta RefNumRP 

Sta RefNumCP 
_Get_Eof RefNumCP 
Bcs ErreurOF 

Lda LongueurOF 

Sta <LongTexte 
LongResult 

Pushlong LongueurOF 
Pushword MyID 
Pushword ##1100000000011000 

Pushlong #0 

_NewkHandle 

Ply 

P1x 

Bcs ErreurOF 

Sty <Handle 

Stx <Handle+2 

Lda [Handle] Où se trouve 
Tax le fichier ? 


Param pour Read 
Param pour Close 
Taille fichier ? 


Taille à allouer 
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Ldy #2 

Lda {Handle],Y 
Sta BufferData+2 
Sta <MyTexte+2 
Stx BufferData 
Stx <MyTexte 
_Read RefNumRP 
Bcs Erreur0OF 
_Close RefNumCP 
Bcs Erreur0OF 
Bra Analyse 
Anop 

Jsl SP FatalErreur 
_Close RefNumCP 


Rts 
Remcmmmmmmmnmmmmmnnen en nennene — Analyse de texte 


Charge le fichier 


ErreurOF 


Ferme tout 


Compte nb lig ($0D) 
Ldy Octets Trans 

Dey 

Shortm 

Anop 

Lda [MyTexte],Y 

Cmp #$0D 

Bne Lc0O 

Inx 

Anop 

Dey 

Bne LoopCor 

Bra StopAnalyse 

Anop 

Phx 

Ldx #CaractM-CaractO-1 


LoopCor 


Compte Nb ligne 


DecrenY 


Lc0 


Transforme les 
minusc accentuées 


Lcl Anop 


Cmp CaractO,X Change les minusc 
anglaises -> VF 
Bne Lc2 

Lda CaractM,X 
Ancp 

Sta (MyTexte],Y 
Bra Lc3 

Dex 

Bpl Lei 

Anop 

Plx 

Bra DecremY 
Anop 


Lcia 
Stocke la valeur 


corrigée 
Le2 


Le3 


StopAnalyse 


pe Calcul la taille de l'ascenseur 
LongResult 
Phx 
Pushword #59 
_Multiply 
Pla 


Hauteur Font = 9 * 
nb de ligne 


pe STE mm Ajuste l'ascenseur 
Sta WDataH Nombre de lignes 
afficher 
pe = Ouverture de la fenètre 


Pha 

Pushlong #D WindAidel 

_NewWindow 

PullLong WRefCon1 
em SR Remet le rectangle à zéro 
LoopRect1 Anop 
Stz NouveauRect, X 
Dex 
Dex 
Bpl LoopRectl 


Pushword #IFermer 


_EnableMItem 
Pushword #IOuvrir Une seule fenètre 
_DisableMItem à la fois 
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*#*#**#**##+ Procédure qui dessine le contenu de la fenêtre 


Procedurel 


LoopRect 


NonActive 


ChercheDebut 


ChercDeb0 


ChercDebl 


ChercDebFin 


DebLigne 


FinLigne 


AfficheTexte 


Rts 
END 


START 

Using Ressource 
Using Datas 

Phb 

Phk 

P1b 

Phd 

Pha 

Lda RegistreD 

Tcd 

Pla 

Lax #6 

Anop 

Lda NouveauRect, X 
Sta <AncienRect,X 
Dex 

Dex 

Bpi LoopRect 
PushLong #NouveaukRect 
_GetPortRect 

Lda NouveauHaut 
<PixelHaut 

Lda NouveauBas 

Sta <PixelBas 


Coordonnées de 
l'ancien rectangle 


Coordonnées du 
nouveau rectangle 


Anop 

Stz <YPosition 
Ldy #-1 

Bra ChercDeb0O 
Longa off 

Anop 

Lda [<MyTexte],Y 
Cmp #$0D 


Bne ChercDebl 
Anop 


Longm 

Cic 

<YPosition 
Adc #Hauteur2Lignes 
<YPosition 
Cmp <PixelHaut 
Bcs ChercDebFin 
Shortm 

Anop 

Iny 

Cpy <LongTexte 
Bne ChercheDebut 
Longm 

Bra Sortie 


Ligne suivante +9 


Phy 

Pushword #10 

Pha 

_MoveTo 

Ply 

Anop 

Sty <PosDepart 
Stz <Compteur 
Shortm 

Anop 

Lda [<MyTexte],Y 
Cmp #$0D 

Beq AfficheTexte 
Inc <Compteur | 
Iny 

Cpy <LongTexte 
Bne FinLigne 

Dey 

Anop 

Phy 

Longm 


Htab 30 
= YPosition 
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LigneSuivante 


Sortie 


Pierre Demblon 


Ça y est, quelqu'un a craqué : à force que 
je répète tout le bien que je pensais de ce 
logiciel de Glen Bredon, et grâce à votre 
amicale insistance, on a trouvé à Pom's 
une courageuse pour traduire la 
documentation. Merci Joëlle. Dans ces 
conditions, j'aurais eu mauvaise grâce à 
refuser d’en faire la présentation. 


D'autant que ni la documentation 
originale, ni même le nom du logiciel, ne 
permettent de voir globalement de quoi il 
s'agit. Glen Bredon le présente comme 
une suite de modules, de commandes 
hétéroclites qu’il a ajoutées peu-à-peu au 
Basic System de ProDOS en fonction de 
ses besoins. C’est beaucoup plus que 
cela : c’est l’Applesoft d'aujourd'hui. 


Un Basic ancestral 


Un peu d’histoire : l’Applesoft est le 
deuxième Basic qui ait existé sur l’ Apple 
Il (après l'héroïque Integer Basic 
légendairement écrit à la main, en hexa, 
par Wozniak). On l’appelait au début 
‘Floating Point Basic’, parce qu'il était 
capable de diviser correctement. Il avait 
été écrit non par Apple, mais par 


Lde 
Beq 
Pei 
Clc 
Lda 
Adc 
Pha 
Pei <Compteur 
_DrawText 


<Compteur 
LigneSuivante 
<MyTexte+2 


<MyTexte 
<PosDepart 


Anop 
Pushword #10 
Cle 
Lada 
Adc 
Sta 
Pha 
__MoveTo 
Ply 

Iny 


<YPosition 
#Hauteur2Lignes 
<YPosition 


<LongTexte 
Sortie 
<PixelBas 
#Hauteur2Lignes 
<YPosition 
DebLigne 

Anop 

Pld 

P1b 


Microsoft, en fonction des Basics comme 
des Apple existants à cette époque (fin des 
années 70) : commençant sur cassette, 
puis chargé d’une disquette, il a fini dans 
la Rom du tout nouvel Apple //, un 
ordinateur doué d’une capacité mémoire 
gigantesque pour l’époque : 64Ko ! Il 
permettait de gérer les caractéristiques 
extraordinaires de cet ordinateur cher mais 
magnifique, l’Apple IT Plus : deux pages 
graphiques, en Haute Résolution en 
couleurs, par exemple. 


Le problème, c'est que, pour l'essentiel, 
l’histoire de l’Applesoft s’est arrêtée là. 
Depuis, Apple s’est contenté de le 
reconduire dans la Rom de ses nouvelles 
machines, de l’interfacer avec les 
systèmes d'exploitation (DOS, ProDOS). 
Même les bugs sont restés, parce que les 
corriger aurait créé des incompatibilités 
avec les programmes existants, écrits en 
fonction d'eux. 


Mais la vie a continué : le Basic a 
changé, l'Apple // aussi. Et les faiblesses 
de ce bon vieil Applesoft sont devenues 
de plus en plus criantes. S’il vit encore, 
c'est à cause d’une caractéristique 


Rt1 


typiquement Apple : l'ouverture. Je l’ai 
déjà écrit, les commandes les plus 
puissantes de l’Applesoft sont ‘&'’ et 
‘Call’. De plus, Apple a introduit dans 
Basic System, l’interpréteur Applesoft de 
ProDOS, une deuxième ouverture : la 
possibilité des commandes externes qu’on 
peut ajouter depuis le disque. 


Et là, arrivent les utilisateurs, les 
bidouilleurs, les programmeurs, bref les 
Glen Bredon : et voilà pourquoi Applesoft 
est toujours vert. Autrement dit, si l’on 
veut comprendre ProCommand, il faut 
partir d'une liste des défauts de 
l'Applesoft : ProCommand, c’est la mise 
à jour permanente de l’Applesoft. 


Par exemple : les capacités d'édition et de 
débuggage de l’Applesoft sont ridicules. 
Sa commande List est primitive. Son 
Input est plus que déficient. Son Print ne 
sait pas formater (Print Using). Il ne sait 
pas fusionner deux programmes ou 
changer globalement des numéros de 
ligne. Les conversions hexadécimal- 
décimal demandent une gymnastique 
fastidieuse. Il ne connaît ni la double 
haute résolution, ni la souris, ni la date et 


RRAÉRARRARARÉRÉARÉRAÉÉÉAÉRÉRÉRAÉAAÉÉÉRÉRÉARÉAÉAÉARÉRARAARÉRARÉRÉ AE A 


CalcRegion 


Anop 


Lda 


Sbc 


Bne 


; Test si modif 
horizontale 

; Si NouveauDroit 
- Anciendroit <> 0 
; Oui : Changement 
de taille 
ChangeTaille A Test modif 
verticale 

; Test si modif 
verticale 

; Si NouveauGauche 
- AncienGauche <>0 


NouveauDroit 


<AncienDroit 


Non : 


NouveauGauche 


<AncienGauche : Oui : Changemen 
5 de taille 
ChangeTaille : Aucune modif 


Fenetreldem Anop 
Lda <PixelHaut ;: Est-ce un scroll 
Cmp <AncienHaut ing vers le bas ? 
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l'heure. Il n’est pas capable de faire la 
moitié de ce que ProDOS sait faire.1 
J'arrête là, j'y serais encore demain. 


D'autant que tout cela est réglé : avec 
ProCommand. ProCommand se présente 
effectivement comme un ensemble de 
‘modules’ à ajouter ‘à la demande’ à Basic 
System. Mais ces modules ne sont pas là 
au hasard. Je vais donc tâcher de le 
présenter non pas module par module, 
mais par fonctions qui sont globalement 
ajoutées à l’Applesoft. Précisons 
seulement que tout cela se présente 
généralement comme des commandes de 
Basic System : les programmes Applesoft 
les traitent comme des commandes Basic 
ordinaires, on peut les taper en mode 
direct. Bref, l’Applesoft est étendu de trois 
ou quatre fois. 


© Un véritable 
éditeur 


ww Edit 

La commande Edit est un éditeur complet 
en une seule commande : un Gple 
complet en une commande qui occupe 
1,5Ko. Déplacements du curseur, modes 
insertion et recouvrement, recherche et 
remplacement, compactage automatique 
des lignes, tout ce dont on peut rêver. 


1 Auto 

La commande Auto permet évidemment, 
sans risques, la numérotation automatique 
des lignes. 


æ Macro 

La commande Macro donne des macros 
clavier à la manière de Gple : ces macros 
sont bien entendu éditables. 


æ Lyst 

La commande Lyst fait encore mieux que 
les macros de Dimitri Geystor pour 
AppleWorks (justification à droite des 
numéros de ligne par exemple) pour 
produire de superbes listings qui 
ridiculisent la commande List. 


@ Boîte à outils 
programmeur 


ww Renumber 

La commande Renumber recalcule tous 
les numéros de ligne, vous donne accès 
aux numéros ‘interdits’ type 65531, 
respecte les programmes machine 
clandestinement ajoutés aux programmes 
Applesoft, marche avec les très gros 
programmes, accepte les ‘List 10-20° que 
les autres rejettent. 


ww Hold, Merge 

Les commandes Hold et Merge permettent 
de fusionner deux programmes ou 
segments de programmes. 


æ Xref 

La commande Xref affiche ou imprime les 
références croisées de toutes les variables 
du programme Applesoft en mémoire. 


æœ Varlst, Vartrce 

La commande Varist affiche la liste des 
variables, la commande Vartrc permet de 
tracer vos variables bien sûr, mais admet 
également des expressions booléennes 
(elle vous permet par exemple de 
surveiller que la variable J reste inférieure 
à la variable T). 


w Pointers 

La commande Pointers vous permet de 
suivre en permanence les pointeurs de 
l’Applesoft (Himem etc). 


 Hexdec 

La commande Hexdec, vous vous en 
doutez, se charge des conversions 
hexadécimal-décimal. 


Vous l’avez compris : adieu nos antiques 
Renumber du Dos Toolkit, adieu l'antique 
APA qui ne respectait pas les standards 
ProDOS. Mais aussi adieu GPLE. Même 
notre excellent EPE a trouvé un rude 
concurrent. 


@ Les manques de 
l’Applesoft 


æ Using, Sci 

Bien évidemment, Glen Bredon a comblé 
l'un des plus gros trous de l’Applesoft, 
l'absence de Print Using, avec ses 
commandes Using et Sci pour la notation 
scientifique des nombres. Mais les 
raffinements de cet Using-là, je ne les ai 





Beg Sal 


Bes ScrollBas 


Lada <PixelBas 

Cmp <AncienHaut 
Bcc SortieAnalyse 
Znop 

Lda <AncienHaut 


ScrollHautPix 


Sta <PixelBas 

Bra SortieAnalyse 
ScrollBas Anop 
Cp <AncienBas 
Bcc ScrollBasPix 
Rts 
Anop 
Lda <AncienBas 
Sta <PixelHaut 
Rts 
Anop 


ScrollBasPix 


SortieAnalyse 
Lda <PixelHeaut 


Sal Beq DebutConnu 
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; PixelHaut = Anci 
enHaut -> Scroll H 


; PixelHaut > Anci ; Si PixelHaut = 0). 


enHaut -> Scroll B 
: PixelHaut < Anci 


On ne cherche que la dernière ligne 


; à mettre à jour car on sait où ça commence. 


î 
enHaut -> Scroll H DebutConnu Anop 
: Scroll Haut Pla (Rts) 
; Petit scrolling? Ldy #-1 
; Non Lda #Hauteur2Lignes 
7 Oui Sta <YPosition 
; Calcul mise à jo Jmp ChercDebFin 
ur minimum 
D nn ne 
ChangeTaille Anop 
; Petit Scrolling Lda <AncienDroit 
vers le Past? Cmp NouveauDroit 
Bcc PlusHaute 
; Oui Bra SortieAnalyse 
; Non NUE à. ets Ier ME DT | re à ee 6 
; La fenêtre est plus Haute 
; Calcul mise à CRAN ER CORRE POS MES D Or 
jour minimum Pluskaute Anop 
Lda <AncienkHaut 
Sta <PixelHaut 


; Si on est en hau 
t de la fenêtre 
; inutile de calcu 
ler début Texte 


Rts 
END 


Beq DebutConnu 
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pas vus sur beaucoup de nouveaux et 
‘SuperBasic’. 


ww Type 

Type permet de lire et imprimer un fichier 
sans les défauts de l’nput de l’Applesoft, 
avec les paramètres de formatage que vous 
choisissez. 


ww Dump 

Dump permet une lecture hexa/ASCII de 
la mémoire ou des fichiers ProDOS, avec 
paramètres toujours. 


sw Sort 

Vous avez du mal à trier vos tableaux de 
variables, et ça prend un temps fou ? Sort 
est une commande magnifique : une base 
de données en une commande Basic ! Tri 
extrêmement rapide (Quicksort) 
alphabétique ou numérique d’un ou 
plusieurs tableaux de variables (chaînes, 
entiers, réels), à une ou à plusieurs 
dimensions, sur le champ voulu, sur un 
index du tableau, donc sans altérer le 
tableau. Vraiment magnifique. 


æ Rnd 

Le générateur de nombres aléatoires de 
l’Applesoft est un peu lent, et il arrive 
souvent qu'il se répète ? Le Rnd de 
ProCommand ne se répétera pas avant 4 
milliards de fois, et il est 15 fois plus 
rapide que celui de l’Applesoft. 


Input 

Vous rêvez d’un /nput qui accepte les ‘;’, 
les ‘;”, etc. ? Une mini-commande /nput 
le fait. 


w Rdline 


Mais beaucoup mieux que ça : vous 
souhaitez une saisie avec des commandes 
d'édition sérieuses, à la AppleWorks ? Un 
input qui accepte juste les nombres ? 
Juste une date ? Juste une chaîne de 10 
caractères ? Toujours en acceptant les 
virgules ? Qui convertit de minuscules en 
majuscules, ou le contraire ? Eh bien, 
c'est là environ 3% des possibilités de la 
commande Rdline, qui est un /nput à 
rendre jaloux bien des applications : une 
sorte d'‘Input Using’ absolument 
magnifique. Entre Sort et Rdline, vous 
diminuez de moitié le temps d'écriture de 
certains programmes. À elles seules, ces 
deux commandes valent les 500,00 francs. 


© L’interpréteur 
ProDOS 


ww Copy 


Basic System, vous le savez, ne donne 


pas accès à certaines possibilités de 
ProDOS, pour lesquelles nous devions 
jusqu'ici passer par le langage-machine. 
Regardez par exemple les contorsions que 
doivent employer les Beagle pour copier, 
par l’Applesoft, les fichiers TimeOut sur 
votre disquette AppleWorks : ils n’ont 
pas de commande Copy. 

Bien entendu, cette commande Copy qui 
copie les fichiers d'un catalogue à l’autre 
est dans ProCommand. 


w Online 

De même qu'une commande Online qui 
regarde quels sont les volumes ProDOS 
présents et donne leurs noms. 


w Date, Datestr 

ProDOS connaît ia date et l'heure, si 
vous avez une horloge, mais pas Basic 
System. Les commandes Date et Datestr 
vont s’en charger, en format 12 heures ou 
en format 24 heures, et vous donneront 
même le jour de la semaine. (Note : je 
parie que nous n'allons pas attendre 
longtemps pour qu’un lecteur de Pom's 
francise les noms de mois et de jours dans 
cette commande). 


æ Clock 


Vous n'avez pas d’horloge ? Eh bien, si 
vous avez un //c, ProCommand vous en 
donne une, en utilisant les interruptions 
de la souris, avec la commande Clock. 


ww Pop 

Les chemins d’accès du ProDOS vous 
embêtent ? Je ne sais pas comment 
résoudre cette question en théorie : 
comme fanatique de ProDOS, vous me 
connaissez, je suis aussi un fanatique des 
noms de volume et chemins d'accès. Mais 
c'est vrai que taper 64 caractères sans 
faute, ce n'est pas la joie tous les jours. 
En théorie, je ne sais pas. Mais en 
pratique, la réponse est ProCommand : 
Par exemple, quand vous êtes enfoncé 
dans un préfixe dément du genre 
/hard/boulot/AppleWorks/data/poms/P44/ 
procmd, la commande Pop vous permet 
de remonter d’un niveau de préfixe. 


« Path 

La commande Path permet de retrouver 
automatiquement un fichier dans 
n'importe quel sous-catalogue d’un 
volume donné, et fixe automatiquement le 
préfixe sur son chemin d’accès. 


w Find 

Une fois que vous avez retrouvé le fichier, 
la commande Find va vous permettre de 
retrouver dans ce fichier n’importe quelle 
chaîne recherchée, en ASCII ou en hexa, 


en vous donnant le décalage depuis le 
début du fichier. 


«x Compare 

Vous pouvez même comparer deux 
fichiers pour voir quelles modifications 
ont été introduites (quels patches du 
patcheur fou vous avez mis dans 
AppleWorks par exemple), avec la 
commande compare. Ce qui est très 
précieux avec cette commande, c’est que 
vous pouvez demander une comparaison 
—avec décalage- : si un paragraphe a été 
ajouté dans un fichier texte, ou qu’un 
fichier en langage-machine a été 
réassemblé, vous pouvez avoir une 
comparaison de ce qui est comparable. 


“æ Paste 

Vous pouvez bien entendu coller un 
deuxième fichier à la fin du premier avec 
la commande Paste. 


æ Setinfo 

Basic System ne nous donne qu’un accès 
partiel aux attributs d’un fichier dans les 
catalogues ProDOS. ProCommand donne 
accès à chaque attribut. Par exemple 
l’octet des paramètres d’accès, qui se 
résume sous Basic System à Lock et 
Unlock, permet sous ProDOS des choses 
bien plus amusantes : autoriser ou 
interdire séparément la lecture ou 
l'écriture d’un fichier, sa destruction, la 
possibilité de le renommer. Il a un bit 
spécialisé qui permet de savoir si le 
fichier a déjà ou non été recopié (très 
pratique pour les ‘backups’ sélectifs). 
Avec la commande Setinfo de 
ProCommand, vous pouvez jouer à 
autoriser l'écriture d’un fichier, mais pas 
sa lecture, et autres fantaisies. 

Mais elle permet également de changer le 
type d’un fichier, ce qui est très précieux, 
pour les polices de Publish-It par 
exemple. Surtout, elle permet enfin 
l'accès à l’octet du type auxiliaire, qui 
devient de plus en plus important sous 
ProDOS 8 et 16. (Pour la lecture de cet 
octet sous Basic System, utilisez le patch 
de J.Y. Bourdin publié dans Pom’s 36 
page 62). 


ww Eject, Format 

Enfin, ProDOS 8 lui-même, confiné qu'il 
est dans les 16Ko de la carte langage, ne 
peut pas tout faire : pour formater un 
disque, ou éjecter une disquette 3,5”, il 
faut passer par un programme-machine. 
Qu'’à cela ne tienne, répond Glen Bredon, 
il suffit de présenter les programmes 
machine en question sous forme de 
commande externe, et Basic System saura 
le faire. 
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La commande Eject se charge donc du l'écran graphique DHGR ? Le module y Desktop Toolkit comme Mr Jourdain 





grille-pain, tandis que la commande 
Format a été faite, souvenez-vous, pour 
faire plaisir à Pierre Demblon. 


© Double Haute 
Résolution 


 DHGR 


L’Applesoft a, à peu près, tout ce qu’il 
faut pour gérer la Haute Résolution : 
Hplot et Hcolor, Draw et Xdraw. Mais 
pour la double haute résolution, bernique. 
ProCommand se charge bien entendu, 
avec des commandes ‘&’ cette fois, de 
nous fournir l'équivalent pour la Double 
Haute Résolution des commandes HGR, 
en 16 couleurs. Les programmes de démo 
de la disquette sont extrêmement impres- 
sionnants ! 


æ Fill 

Un module Fill vous permet de remplir 
très rapidement en couleurs, par une 
simple commande en Basic, des figures 
tracées. Une palette de différents mélanges 
de couleurs est permise, avec un nombre 
de combinaisons quasi-infini. Là aussi, 
faites tourner les démos. 


ww Hor 

Je suis plutôt impressionné, certains 
jours, par des programmes 8 bits 128Ko 
dont l’affichage se fait en double haute 
résolution noir et blanc, comme 
Publish-it ou Springboard Publisher, et je 
me demande à quoi sert, en monochrome, 
la super haute résolution du GS. 
L'explication est simple : pour le 
moment (mais ça changera un jour), la 
résolution maximale du GS est de 600 
points horizontaux sur 200 points 
verticaux. Or, en double haute résolution 
monochrome, on atteint 560 points sur 
192 : la différence est minime. 

Oui, mais comment faire, vous et moi, 
pour faire aussi bien que Publish-it ? Le 
module HGR de ProCommand, bien sûr. 


Rob 

Bien entendu, ça ne vous suffit pas, vous 
voulez mélanger les deux modes couleur 
et monochrome, ‘à la Arlequin’. Bien 
entendu, Glen Bredon aussi. Puisqu’il faut 
pour cela une carte couleur RVB type 
Féline ou un GS, Bredon a mis un module 
RGB qui s’en charge, toujours sous Basic 
System. 


ww Print Hgr 

Ça ne vous suffit toujours pas, vous 
voulez un générateur de caractères en 
double haute résolution, faire Print sur 
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est, bien sûr. Vous voulez profiter de ce 
Print pour faire des animations DHGR ? 
Il le fait, bien sûr. 


“ Éditeur de polices 

Vous voulez un éditeur pour ces polices 
graphiques et ces shapes ? Il y est, bien 
sûr. 


« Hload, Hsave 

Vous souhaitez, indépendamment de tout 
module graphique, pouvoir charger, voir à 
l'écran, et sauver, les images DHGR type 
Dazzle Draw ? Les commandes Hload et 
Hsave s'en chargent. Pratique, pour les 
Slide Show. Vous trouvez que ces images 
Dazzle Draw sont bien grosses avec leurs 
33 blocs : les mêmes commandes se 
chargent, si vous le souhaitez, de 
compresser et décompresser les fichiers 
images ! 


Bref, comme d'habitude avec Bredon, il 
vaudrait mieux faire la liste de ce que son 
programme ne fait pas, que la liste de ce 
qu'il fait : ce serait plus court... 


© La souris 


Essayez donc, sous Applesoft, de déplacer 
une ‘shape’ (un curseur par exemple), 
avec la souris. Ou bien de lire la position 
de la souris : 

amusez-vous bien ! La documentation 
donnée par Apple avec la souris //e dit ce 
qu'il faut faire, mais quelle galère. 


ww Mouse 

Jusqu'ici, j'’utilisais un excellent 
programme, méconnu et c'est bien 
dommage, publié par Apple lui-même : il 
s'appelle Apple II DeskTop Toolkit 
consiste en 4 disquettes 140Ko, 450 
pages de documentation, et fournit 
l'ensemble des routines nécessaires pour 
interfacer vos programmes avec la souris, 
tant en mode texte qu'en mode graphique, 
tant en assembleur qu’en Pascal ou qu’en 
Basic. 

Ce programme était destiné aux 
développeurs (mais nous sommes tous 
des développeurs). Si vous ne l’avez pas, 
dépêchez-vous : l’APDA le diffuse encore, 
mais dans sa boutique des ‘antiquités et 
curiosités” (il date de 85, les choses vont 
vite ces temps-ci). En fait, vous le 
connaissez : nombre d'applications se 


résument pour l'essentiel à de la (bonne) 
sauce mise autour de ces routines 
(l'excellent MouseWrite, chez Roger 
Wagner, par exemple). Nous faisons du 


faisait de la prose. 


L'avantage du module Mouse de 
ProCommand, c’est qu’il est parfaitement 
intégré avec ses autres routines de gestion 
de la Double Haute Résolution. Faites 
tourner le programme de démo (Demo 
Mouse), et vous m’en direz des nouvelles. 


x Reset 

La mémoire de l'Apple // n'étant pas 
infinie, il faut gérer tout ça ensemble. Il 
va bien falloir un jour enlever les 
commandes supplémentaires pour laisser 
la place au programme lui-même, par 
exemple. Comment faire ? Eh bien, c'est 
très simple : utilisez la commande Reset, 
de ProCommand, bien entendu ! 


æ Cmds 

ProCommand semble avoir toujours la 
réponse. Mais sur là, il ne m’aura pas. 
C'est qu’il y a une limite à ce système 
des commandes à Basic System du 
ProDOS, précisément ce fait qu’on ne 
peut pas les utiliser toutes à la fois, 
puisqu'il faut rajouter chaque commande 
en mémoire. Or la solution est connue, 
elle est dans des interpréteurs comme 
Davex, ou dans des systèmes 
d'exploitation dont je n'ose pas écrire le 
nom ici : les commandes non-résidentes. 
Vous tapez la commande avec ses 
paramètres, et si le système d'exploitation 
ne l’a pas en mémoire, il va la chercher 
sur le disque, l’éxécute, puis libère la 
mémoire qu’elle a occupée. Apple n’a pas 
pensé à ça, dans Basic System. Ah, 
coincé, ce coup-là, n'est-ce pas ? 


Vous vous en doutez : encore perdu, 
Demblon ! Ce damné Glen Bredon a mis 
une commande Cmds qui va chercher les 
commandes sur le disque: avec la 
commande Reset, ça règle la question. Et 
inutile de dire «ça va planter si tu changes 
de disquette», parce que, bien sûr, la 
commande Cmds permet de choisir le 
chemin d'accès ProDOS des commandes 
additionnelles. 


Et si le type CMD que Glen Bredon 
donne à ses commandes ne vous convient 
pas (avec le type BIN on peut faire un 
‘brun’ ou un ‘—"}, eh bien utilisez donc la 
commande Setinfo.. de Glen Bredon. 


Je l'ai déjà écrit : cet homme est un 
génie. Chapeau. 


C'est une conclusion suffisante, je pense. 


G 
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Graphisme & Son 








Nos quatre nouvelles DPA de ce 
numéro ont une orientation 
totalement Graphiques et Sons. 
Elles ne sont disponibles 
évidemment qu’en format 3,5" 
pour le GS. 


Nous avons poursuivi le travail de 
classement et de sélection de ces 
images et sons du domaine public. 
Vous trouverez l’essentiel de ce 
qu’il y a à savoir sur ceux-ci dans 
les numéros 42 et 43 de Pom’s, et 
dans le fichier Lisez-moi sur les 
disquettes. 


DPA.023 et DPA.024 
Images GS 3 et 4 


Rappelons seulement quelques choix que nous avons 
faits : 


°+ _ Nous avons choisi le format de fichier, pourtant 

obsolète, de GS Paint ($CO, type auxiliaire O). Et cela, 
tout d’abord parce que GS Paint, donné avec le GS, et qui 
est une bonne application, est entre les mains de tous les 
GSphiles français. De plus, ce format est le plus 
compressé, et permet de mettre le maximum d’images sur 
chaque disque. Enfin, il permet d’obtenir des images de 
deux écrans de haut, et de les imprimer. Ce format est 
accepté tel quel par AppleWorks GS et PaintWorks Gold. 
Pour passer ces images dans d’autres applications, le 
mieux est de les passer d’abord dans GS Paint pour 
convertir en fichiers écran de type $C1. 


+ À noter que si le nom du fichier a le suffixe “640”, 

cela signifie qu’il est en mode 640, avec Dithering. 
S’il a le suffixe “.DBL”, cela signifie que c’est un dessin 
de deux écrans, une page imprimée. 


* _ Vous trouverez sur ces disquettes une application de 

bureau freeware appelée Panoramix (à lancer sous 
GS/OS) qui permet de faire défiler les images de toutes les 
façons possibles, et d'intervenir sur les fichiers. Faites 
G-L pour voir l’ensemble des images d’un disque. 


+ Que faire avec toutes ces images ? Il y a des réponses 

évidentes : les regarder, tout d’abord (certaines sont 
magnifiques, et feraient à elles seules vendre des GS). Mais 
aussi, bien entendu, jouer au livre d’images, au jeu du 
coloriage sur GS : quand on voit ce qu’on peut faire avec 
GS Paint et ces images, on sourit de nos antiques 
“coloriages” VersionSoft. Donnez ces images et GS Paint 
à un enfant, et il n’est pas près de vous rendre votre GS. Et 
n'oubliez pas les animations GS Paint ! 


On peut aussi bien entendu les imprimer (en couleurs 
éventuellement). Elles rentrent donc comme composant 
dans notre PAO personnelle, nos en-têtes de lettres, cartes 
de vœux, etc. 

Mais nous voudrions vous suggérer une autre utilisation 
particulièrement amusante : les puzzles. Avec le 
programme de Puzzle de Pom’s 43, vous créerez des 
puzzles très amusants, et certains seront atrocement 
difficiles. Mais là, au moins, vous ne perdrez pas de 
pièces, et vous pourrez interrompre et reprendre quand 
vous voudrez. Attention : il faut passer ces dessins dans 
GS Paint et les sauver en format écran 65 blocs, les 
décompresser donc, pour en faire des puzzles. 


La disquette DPA.023... 


comporte 45 images. Tout d’abord, une série d’agréables 
paysages, généralement paisibles et reposants : le paysage 
permet un jeu des couleurs et des dégradés où le GS révèle 
ses capacités. 

Nous avons équilibré cet apaisement avec une série 
d'images d’horreur (images d’horreur ne signifiant pas 
images horribles !), dans un sous-catalogue appelé 
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/Frissons. Quelques vampires et autres étranges visiteurs 
pour peupler nos cauchemars. 

Pour retourner à la beauté (!), mais aussi un peu à 
l’humour, reconnaissons-le, nous avons mis un 
sous-catalogue /REDACTION.POMS dans lequel vous 
trouverez. nos portraits. Oui, nous sommes tous là : 
Ariel Sebban, Christian Piard, Daniel Lurot, Éric 
Weyland, Hervé Thiriez, Jean-Luc Bazanègue, Jean-Yves 
Bourdin et Joëlle Piard. Certains d’entre nous ont même 
deux portraits, et un portrait collectif du conseil de 
rédaction couronne le tout. 

Nous ne vous cacherons pas que nous nous sommes 
félicités d’avoir décidé, à l'avance, que nul n’aurait le droit 
de retoucher son portrait ou de refuser le travail des 
artistes. 


Vous trouverez enfin sur cette disquette 14 images de 
Science-Fiction dans le sous-catalogue /sr. Après le 
réalisme des portraits, le déchaînement de l’imagination 
des artistes. 


La disquette DPA.024... 


comporte 50 images, et elle est plus orientée vers l’art : 
qu'il s’agisse de la peinture ou du cinéma, ou de la 
littérature, avec des images d’aventures, de chevaliers, de 
pirates, ou d’études proprement artistiques dont certaines 
(Africa, Age de Pierre, etc., sont à notre avis vraiment 
belles), ou de la musique. 


Nous avons donc complété ces images avec des images 
plus rudes : une série de guerriers, du sport, et avec 
quelques images humoristiques qui nous ont vraiment 
amusés (par exemple le “Hit Any Key to continue.….”). 


DPA 025 et 026 
Sons GS Volume 3 et 4 


Deux nouvelles disquettes pleines de sons numérisés (tous 
différents, même si les noms sont voisins). Rappelons que 
si une carte de numérisation est nécessaire pour enregistrer 
ces sons, il n’est besoin d’aucune carte particulière pour 
les éditer, les mettre dans vos programmes, etc., une fois 
qu’ils sont sur la disquette. C’est la même chose qu’avec 
les images numérisées. 


Répondant à votre demande, nous avons cette fois-ci mis 
également des musiques enregistrées, et des sons plus 
longs, quitte à en mettre moins. Nous avons également 
recherché la qualité de la reproduction avec des sons à 
échantillonnage plus fréquent, qui sont donc à jouer plus 
rapidement. 


Comment gérer tous ces sons ? On peut tout d’abord les 
éditer, pour les travailler, les couper-coller, les ralentir ou 
les accélérer, leur donner de l’écho, etc. C’est l’objet de 
l’excellente application freeware SoundStudio que vous 
trouverez sur chaque disquette de sons (à lancer sous 
GS/OS). Pom’s recommande aussi l’application Sound 
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Shop, incluse dans HyperStudio. 

Pour inclure ces sons dans vos programmes, nous vous 
recommandons bien entendu HyperStudio : nous sommes 

dans l’ère de l’Hypermédia, nos programmes doivent 
désormais être “graphiques/sons”, et HyperStudio, comme 
Hypercard sur le Macintosh, est ce qui le permet le plus | 
facilement. 


Mais n’oubliez pas trois autres usages de ces sons, usages 
amusants et faciles : 
° travailler sous AppleWorks GS (ou autre) avec une 
musique de fond, qui joue en même temps que vous 
travaillez (eh oui, le GS le permet): c’est possible avec le 
NDA BackGround Music de la disquette DPA 11. 
+ lancer un de ces sons au démarrage de la disquette : 
c’est possible avec l’Init (ou TIF : les Init du GS sont 
des Pif et des Tif) StartSound de la DPA 20. 
+ remplacer le Bip du GS par un son de votre choix 
(voyez le passage sur AppleWorks-Tarzan dans 
Apple // For Ever du numéro 43). C’est ce que permet 
l’Init (PIF cette fois-ci) Sysbeep que vous trouverez sur 
la DPA 10. Essayez plusieurs sons : à l’usage, il s’avère 
que si certains sons sont lassants comme messages 
d’erreur, d’autres continuent à faire rire à chaque fois. 


Trois précisions enfin: 

+ Le suffixe “.200”, “.400”, etc., dans le nom du fichier 
indique la vitesse à laquelle, à notre avis, ce son doit 

être entendu. Mais bien entendu, une des premières choses 

à faire avec SoundStudio, c’est de faire varier cette vitesse, 

pour s’amuser. Cette valeur est déposée dans le type 

auxiliaire du fichier. 

+ Beaucoup de ces sons, en particulier les plus courts, 
doivent être entendus en répétition permanente (icône 

circulaire dans SoundStudio), par exemple les bruits de 

machine à écrire ou de mitraillette. 

+ N'oubliez pas que la sortie son du GS accepte un 
casque stéréo : la famille n’apprécie pas toujours quand 

vous bricolez vos sons sur le GS... 


Liste des sons de la DPA 025 
BEETHOVEN (une très belle musique, qui occupe la 
moitié de la disquette). BOUM. BRUITAGE. CHIENS. 
DINDES. ÉLÉPHANT. GOOD.JOB. INCORRECT. 
LION. MOUU. RIGHT. RIRE.I. RIRE.2. RIRE.3. 
RYTHME. 


Liste des sons de la DPA 026 


APPLAUDISSEMENTS. BRIS. CARILLON. 
CLOCHES. CLOCHETTE. DONG1. DONG2. EAU. 
EUUAA. EXPLOSION. HARMONIE. LASERI. 
LASER?2. MACHINE. ÉCR. NAGE. SAUT. SIFFLET. 
SPLASH. TINTEI. TINTE2. TINTE3. TIRS. ABCD. 
WARNING. A.1.2.3.4. BANJO. BOING. BONG. 
CARILLON. CORNE. DONG. RYTHME. SHIT. TIR. 
VERY.GOOD. WOOPS. DISCO. TROMPETTES 


G 
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Pom's a déjà publié deux 
accessoires de bureau 
destinés à la recherche des 
caractères dans les 
différentes polices : Lucy 
et ad litteram. Le second 
est devenu depuis un 
standard, mais il lui 
manquait cependant 
quelque chose : l'affichage 
de la séquence de touches 
nécessaire à l'entrée au 
clavier de caractères 
‘exotiques’. Par exemple, 
pouvez-vous nous dire, 
comme ça, sans réfléchir, 
comment on obtient le 
caractère ‘E° ? Pas 
évident, hein ! Et bien, en 
faisant Option - Majuscule 
1, puis Majuscule E, et 
cela Stricto sensu peut 
vous l'indiquer. 





Jean-Luc Bazanegue 
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Pom’s - Stricto sensu 


0123456789 


ÉÉÉFGHITIIKLMN 


 [<Beck space” 


NOOOOOOGPQORST 


UÜUUUUVWXYYŸZ 


Option - Majuscule “1”, puis Majuscule ‘E° 


Décimal : 131 
! Hexadécimal : 83 
; Octal : 203 
É Bineire : 1000 0011 


H 


Police Complète 





Accessoirement, et surtout pour les 
développeurs, Stricto sensu affiche le 
code décimal, hexadécimal, octal et 
binaire des caractères ou des touches 
spéciales du Macintosh. 


Utiliser 
Stricto sensu 


Choix de la police 
de caractères 


Lors de l'ouverture de l'accessoire, la 
police affichée par défaut est ‘Times’ 
si elle est présente dans le système ; 
c'est la plus complète. 


Sinon, Stricto sensu utilise ‘Chicago’ 
qui est toujours présente puisque 
faisant partie du ‘système Macintosh’. 
Pour changer la police de caractères, 
utilisez le menu ‘Police’ qui s'installe 
dans la barre de menu au moment de 
l'ouverture de l'accessoire. Il donne 
accès à toutes les polices présentes. 


Choix de la taille 
des caractères 


À l'ouverture de Stricto sensu 
—comme au moment d'un 
changement de police—, une routine 
vérifie si la police existe en 24 points. 
Si c'est le cas, cette taille est choisie. 
Sinon, la routine continue ses 
recherches en allant vers 9 points (24, 
18, 14, 12, 10 puis 9 points). La 
première taille valide trouvée est 
employée. Dans le cas où aucune de 
ces tailles n'existerait —<c'est rare— le 
processus repart dans l'autre sens, de 
36 à 54 points. 
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Pour un changement ‘manuel’ de la 
taille des caractères, utilisez les 
boutons de taille situés à droite du 
texte. Seules les tailles valides sont 
proposées. 


Séquence de touches 
et codes des caractères 


La sélection du caractère pour 
l'affichage de la séquence de touches et 
des codes du caractère peut se faire de 
trois manières différentes : 


Barre d'insertion : 

l'affichage concerne le caractère qui 
précède la barre d'insertion. Ceci est 
pratique lorsque l'on veut obtenir le 
code d'un caractère frappé directement 
au clavier. 

Un caractère sélectionné : 
l'affichage concerne naturellement le 


Plusieurs caractères 
sélectionnés : 

l'affichage concerne le premier 
caractère de la sélection. 


Il est aussi possible de se déplacer 
dans le texte à l'aide des touches 
fléchées pour afficher les informations 
sur les caractères. 


Touches ‘spéciales’ 


Pour obtenir les codes d'une des 
touches spéciales du Macintosh, il 
suffit de cliquer sur un des boutons 
situés en haut et à droite de la fenêtre. 


Bouton ‘Police complète? 


Il permet d'obtenir à nouveau la liste 
complète des caractères —classés par 


Notes 


Lorsque l'accessoire affiche “Impos- 
sible : utilisez le ‘Copier/Coller'”, 
cela veut dire que nous n'avons pas 
trouvé la méthode pour obtenir au 
clavier le caractère considéré ; il est 
néanmoins possible que certaines 
séquences de touches particulièrement 
‘tordues’ nous aient échappé. Dans ce 
cas, faites nous part de vos 
découvertes et nous modifierons 


l'accessoire en conséquence. 


Stricto sensu fonctionne sur tous les 
Macintosh. En revanche, l'affichage 
des séquences de touches ne sera exact 
que si les trois éléments suivants sont 
réunis : 

e Macintosh plus, SE, Il... Le 
clavier du Mac 512 ne convient 
pas ; 

° clavier ‘AZERTY ; 








caractère sélectionné. ‘thèmes’ — après une édition. + Système français (ou francisé). 
Winclude <MacTypesh> ee 2. is 97,Une_fois Touche, 97,00, fa 
finclude <DeviceMgrh> DES VE TI - ras 135,Deux_fois Maj+Op, 49, Touche, 97, Jr at 
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Le ne a -54 100,Une_fois :Touche,100,0,0, 1e d"/ 
hdeñne 19 . AUS fe Jiue OA Fe Re 101,Une-_fois Touche,101,00, Pret! 
Wdefine +10 1 7Une_fois Majusc, 71,00, fe G*/ TUE pe 4 
#define +12 2 72, Une_fois Majuse, 72,00, /*H*/ Deux_fois Maj+Op, 49,Tou ’ 
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JUne_fois Majusc, 73,0,0, A “ès 
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define 124 5 235,Impossible Touche,230,0,0, rte eee ; KA 
: a : RÉ Pete 145,Deux_fois Majusc,172, Touche,101, J° e*/ 
define 48 : 737 Am osaible Touche 230,00 Pi 19Z/Une_ fois Touche 102.09, eu 
#define 154 8 74,Une_fois Majusc, 74,00, J+ 104 Une fois MAS be 
define nScroll 9 75,Une_fois Majusc, 75,0,0, LR y 105,Une_fois (Touche;105,0,0, foi 
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#define Une fois 1 132.Deux_fois Option, 110, Majusc, 78, Je Re a In TS nu 
Wdefine Deux fois 2 79,Une_fois Majusc, 79,00, 1° ot) 245/Une fois Maj+Op, 7800, /*1"/ 
voue ANS Sent iene” MO nues mien Re 
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define Touche 0 29.mpossble Touche, 239,00, 1e O2 106 Unes ls ‘Touche 10600 Ar 
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#define Maj 1 205,Deux_fois Option, 110, Majusc, 79, J* O*/ ere 5 * n*/ 
Hdefine Option 2 175/Une_fois Maj+Op, 48,0,0 1 @*/ ue LS 
Hdefine Op 2 80,Une fois Majuse, 80,00, | /e P+) ee ee 
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51,Une_fois Touche, 51,0,0, /3*/ 243,Impossible Touche,243,0,0, /* Ü*/ es fois Touche,112,0,0, Le 4 
52,Une_fois ,Touche, 52,0,0, ET 244, Impossible, Touche 244,00, / Ü*/ TS LIRS fie Touche 1100 Je au 
S3;Une_fois Touche, 53,0,0, I" 5* 86,Une_fois Majusc, 86,0,0, PONT 114,Une_fois :Touche,114,0,0, ler) 
S4Une_fois ,Touche, 540,0, fier 87,Une_fois ,Majusc, 87,0,0, ae | 115,Une_fois ,Touche 115,00, Ps) 
55,Une_fois Touche, 55,0,0, #7" 88,Une_fois Majuse, 88,0,/0, x) 116/Une_fois Touche 116,0/0, Pt) 
56,Une_fois Touche, 56,0,0, /° 8*/ 89,Une_fois ,Majusc, 89,00, JON. 117,Une fois :Touche,117,0,0, fe u*/ 
S7,Une_fois Touche, 57,0,0, RICA 217,Une_fois ,Maj+Op, 89,0,0, JEU 156,Deux_fois Maj+Op, 49, Touche, 117, Pü*/ 
32,Une_fois Touche, 320,0, P # 90,Une_fois ,Majusc, 90,0,0, P2°) 157;Une_fois ,Touche,157,0,0 x fe ù*/ 
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120,Une_fois ,Touche,102,0,0, 
121,Une_fois ,Touche,121,0,0, 


122, Une _fois ,Touche 122,0,0, 
190, Une_fois Option, 97,0,0, 
207,Une_fois ,Option,111,0,0, 
222,Une fois Option, 103,00, 
223,Une_fois ,Maj+Op, 71,0,0, 
63,Une_fois Touche, 630,0, 
192,Une_fois ,Maj+Op, 63,0,0, 
33,Une_fois Touche, 33,0,0, 
193,Une_fois Option, 33,00, 
44,Une_fois Touche, 44,0,0, 
46,Une_fois ,Touche, 46,0,0, 
201,Une_fois ,Option, 46,0,0, 
225,Une_fois Maj+Op, 70,00, 
58,Une_fois Touche, 580,0, 
59,Une_fois ,Touche, 59,0,0, 
202,Une_fois ,Option, 32,0,0, 
36,Une_fois ,Touche, 36,0,0, 
163,Une_fois ,Majuse,163,0,0, 
180, Impossible, Touche, 180,0,0, 
39,Une_fois ,Touche, 39,0,0, 
34, Une_fois Touche, 340,0, 
227,Impossible Touche 227,0,0, 
210,Une_fois Option, 34,0,0, 
211,Une fois Maj+Op, 34,00, 
212,Une_fois Option, 39,0,0, 
213,Une_fois ,Maj+Op, 39,0,0, 
226,Une_fois Option, 36,0,0, 
| 199, Une _fois /Option,143,0,0, 
200,Une_fois ,Maj+Op, 55,0,0, 
95,Une_fois ,Majusc, 95,0,0, 
208,Une_fois ,Maj+Op, 45,0,0, 
209, Une _fois Option, 45,0,0, 
| 35,Une _fois ,Maj+Op,163,0,0, 
37,Une_fois Touche, 37,0,0, 
228,Une fois ,Maj+Op, 37,00, 
| 40,Une_fois Touche, 40,0,0, 
| 41,Une_fois Touche, 410,0, 
91,Une_fois ,Maj+Op, 40,00, 
93,Une_fois ,Maj+Op, 41,00, 
| 123,Une_fois Option, 40,0,0, 
| 125,Une_fois Option, 41,00, 
| 42,Une_fois Touche, 42,0,0, 
43,Une_fois Touche, 43,00, 
177,Une _fois ,Maj+Op, 61,00, 
45,Une_fois ,Touche, 45,00, 
47,Une_fois Touche, 47,0,0, 
218,Impossible Touche,218,0,0, 
92,Une_fois ,Maj+Op, 47,00, 
60,Une_fois ,Touche, 60,0,0, 
| 62,Une_fois ,Majusc, 62,0,0, 
| 61,Une_fois ,Touche, 61,0,0, 
| 173,Une_fois Option, 61,0,0, 
| 197,Une_fois Option, 120,0,0, 
176,Une_fois (Option, 44,0,0, 
178,Une_fois Option, 60,0,0, 
179,Une_fois Maj+Op, 62,0,0, 
94,Repetition Touche, 94,0,0, 
| 94,Une_fois ,Maj+Op, 54,00, 
| 214 Une_fois Option, 58,0,0, 
| 215,Une_fois Option, 118,0,0, 
| 219,Une_fois ,Maj+Op, 82,00, 
220,Une_fois ,Option,119,0,0, 
221,Une fois Maj+Op, 87,00, 
198, Une _fois ,Maj+Op, 68,0,0, 
186,Une_fois ,Maj+Op, 66,0,0, 
| 124,Une_fois Maj+Op, 76,00, 
160, Une_fois ,Option,116,0,0, 
194,Une_fois ,Option,108,0,0, 
195,Une_fois ,Maj+Op, 86,0,0, 
161,Une_fois ,Majusc, 161,00, 
162,Une_fois ,Maj+Op, 67,00, 
164, Une_fois Touche,164,0,0, 
165,Une_fois Maj+Op, 46,0,0, 
| 166,Une_fois ,Option,164,0,0, 
| 168, Une fois /Option,114,0,0, 
| 169, Une_fois Option, 99,0,0, 
170,Une_fois ,Maj+Op, 84,00, 
167,Une_fois (Option, 98,0,0, 
181,Une_fois /Option,109,0,0, 
182,Une_fois Option, 100,0,0, 
183,Une_fois ,Maj+Op, 83,0,0, 
184,Une_fois ,Maj+Op, 80,00, 
185,Une_fois ,Option,112,0,0, 
189,Une fois Maj+Op, 81,0,0, 
196,Une_fois (Option,102,0,0, 
224,Une_fois (Option,113,0,0, 
240,Une_fois Option, 38,0,0, 
171,Repetition, Maj+Op, 49,0,0, 
172,Repetition, Majusc,172,0,0, 
| 126,Repetition Option,110,0,0, 
96,Repetition, Touche, 96,0,0, 
246,Impossible Touche, 246,0,0, 
247,Impossible Touche,247,0,0, 
248,Impossible Touche,248,0,0, 
249,Impossible, Touche, 249,00, 
250,1mpossible Touche,250,0,0, 
251,1Impossible Touche 251,0,0, 
252,Impossible Touche,252,0,0, 
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216,Deux_fois Majusc,172,Touche,121, 





















fe x*/ 254, Impossible Touche 254,0 Ps À 
l'y" 255,1m possible, Touche,255,0,0 Ÿ Hig À 
15 k 

. 

. ie Pa / 
f° æ*/ int Ouvert =0; 

Fe fe) int g4] = {OxAAS5S, OxAA55, OxAA55, OxAA55 }; 
/" 8"/ int 49] = (9, 10, 12, 14, 18, 24, 36, 48, 54 }; 
12 int Special =0; 

lai int  nlignes; 

VLRL71 int  nPolice; 

fre/ lé. Pole 

fe, int tPolice; 

1." int  merull}; 

Vs or 4 

+) Byte bis] = (128, 64, 32, 16, 8,4,2,1}; 
f:*/ Byte s{10] ={27, \t, 010", °\033’, \r,, \003", 
Je: "\084!, "\085!, 1036, "\087 }; 

+] Byte 1253] = { 

1 S*/ 01,2,3,/2,3,6. 1Tr8,9 AIS 

fe £*) 32013202," 13 A A AU À 

Je Y*/ AA B,C'CDUE ÉVEUE, 

+) ÉFGHTÉ "TUTK, 

pe“) L'M/N°/N,0,0,0, Eos 

1." P'QRST,U,Ü, 0, OU, V, 

pe) ZAISÆ,E,E,13,13, 
Je") Pa be, 

JA ee, ghi, 

J'*/ FRA TURT "m'a, 

/°,/ 06,0 ,6,0,6,e,",p,d,r, 

{"«*/ a 0 0 UV We x Y, 

1 »*/ ÿ Z' 13,132 æ',f',4",13,13,7, 3, 

f CALE EU KE À À 

=") *, 13 ,13,39,34,227,210,211,212,213,226, 199, 

fe —*]) 200,13,13,°_°"-,"—",#"%","%e',(,),l, 

pe #*/ TOTAL 12/2 A7 21892, 

1° %*/ D Pr re 

[° %o*/ ADS fe E HN TS , 

1 €*/ €,8,e °1,2,e,701313,8/ 40, 

abs Z'TrQ"f,+,é 13137 r, 

PET rer a 

J 17 char h{16] "01: as “45, 6,7,8,9','A', 
1{"/ B',C,D,E,F } 

dl Le À 

fe **/ DCtIPtr deæe; 

/+*/ WindowPtr pFenetre = OL; 

/*+*/ MenuHandle menu = OL; 

/-*/ ControlHandle  Ctrif11}; 

fl /*/ TEHandle hTexte; 

in di À 

fe \*/ pascal void Defile{); 

Fey 

/* > ./ [renveaneusentencaseeanmennenseetemedennenne | 
/*=*/ main(bParam, DeviceCE, PointEntree) 

f+*/ cntrlParam  ‘bParam; 

fut) DCtPtr DeviceCE; 

f* mt) int PointEntree; 

J<*) { 

1 2>*] if (DeviceCE->dCtiStorage == 0) 

As { 
. pcs if PointEntree == 0) 
. : sBeep{1} 
Ë a CloseDriver(DeviceCE->dCtiRefNum); 
+ } 
: we return(0); 
/* 4 } 
: il FA dce = DevicœCE; 
Pa dd dee->dCtIFlags &= -dCtiEnable; 
=") 
VAR LI switch (PointEntree) 
ba À { 
? pb 2 À case 0: 
ré 4 { 
IC À Ouvrir(); 
de ed } 
J° ®*/ break; 
/e"/ case 2: 
lisse) À { 
/°28°/ 1ControK{bParam->csCode, bParam->csParam); 
Pur } 
/° 9*/ break; 
PE case 4: 
/TI*/ { 
fx") Fermer(); 
/°a*/ } 
PTE break; 
PET default: ; 
dm M 4 } 
ads À 
ET dce->dCtiFlags |= dCtlEnable; 

P-* returm(0); 

# ® */ } 
FY 

Je", / nananeanar nes ceeseeeeneseentensees / 
AP À Ouvrir() 

? lol L d */ { 

? sde À dce->dCtiFlags |= dNeedLock| dNeedGoodBye; 
| pois” | if (pFenetre) SelectWindow(pFenetre); 

Pt J if (Ouvert) 





case accEvent: 


TrMenu(parametres{] }; 
break; 


case accCut 
Couper(}; 
break; 

case accCopy: 
Copier); 


TEDispose(hTexte); 
DeleteMenu(dce->dCtiMenu); 
dce->dCtiMenu = 0; 

ï menu); 
DrawMenuBar(); 
DisposeWindow(pFenetre} 
pFenetre = OL; 
dce->dCtiWindow = 0; 

} 


/ 
Evenement{event) 
EventRecord “event; 
{ 

switch (event->what) 





RAR RARE RENAN NT ERE RARE ME RUE RUE | 


case updateEvt: 
MiseJour(); 
break; 
case mouseDown: 
Cli{event->where, event->modifiers & shifiKey); 
break; 
case activateEvt: 
Active((Boolean)event->modifiers & activeFlag)); 
break; 
case keyDown: 
case autoKey: 
{ 
if (event->modifiers & cmdKey ) 
Commande((charKevent->message & 
charCodeMask)); 


{ 
Frappe{(charKevent->message & 





'aneneneenenennnennes / 


Rossi 
return( 0xC000 + ((-(dce->dCtiRefNum)}<<5) + n }; 
} 








/ teste sé ee : Las 3 1 
MiseJour() 
{ 
Rect " 
ist int 
GrafPtr  savePort; 
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Str255 c 


GetPort( &savePort }; 
SetPort( pFenetre ); 


BeginUpdate(pFenetre); 
TextFont(geneva); 
TextSize(10); 


SetRect(&r, 8, 8, 234, 241); 
FrameRect(&r); 


for(i=8;i<153;i+= 16) 


{ 
SetRect(&r, 812, i, 385, i + 17); 
FrameRoundRect(&r, 4, 4); 

} 


PenPat(&g{0]}; 

SetRect(&r, 256, 8, 305, 169); 
FrameRect(&r); 

SetRect(&r, 256, 176, 385, 241); 
FrameRect(&r); 

PenNormal(); 


MoveTo( 267, 192); 
DrawString("\pDécimal :"}; 
MoveTo( 267, 205); 
DrawString("\pHexadécimal :"}; 
MoveTo( 267, 218); 
DrawString("\pOctal :}%; 
MoveTo( 267, 231); 
DrawString("\pBinaire :"); 


MoveTo( 331, 20); 

if (Speciale == 1) TextModelsrcBic); 
DrawString("\pEscape”}; 
TextMode(srcOr); 

MoveTo( 321, 36); 

if (Speciale == 2) TextMode(srcBic); 
DrawString("\pTabulation"} 
TextMode(srcOr); 

MoveTo( 318, 52); 

if (Speciale == 3) TextModelsrcBic}; 
DrawString("\p'Back space} 
TextMode(srcOr); 

MoveTo( 322, 68); 


MoveTo( 332, 84}; 

if (Speciale == 5) TextModelerc Bic}; 
DrawString("\ 

TextMode(srcOr}; 

MovelTo{ 332, 100} 

if (Speciale == 6) TextMiodelsrc Bic }; 
DrawString("\pEntrée"} 
TextMode(srcOr); 

MoveTo( 332, 116); 

if (Speciale == 7) TextMocdelsre Bic); 
DrawString("\pGauche"} 
TextMode(srcOr); 

MoveTo( 333, 132}; 

if (Speciale == 8) TextModelsre Bic); 
DrawString("\pDroite"} 
TextMode(srcOr); 

MoveTo( 337, 148}; 

if (Speciale == 9) TextMode(src Bic); 
DrawString("\pHaut"); 
TextMode(srcOr}; 

MoveTo( 340, 164); 

if (Speciale == 10) TextMode(srcBic); 
DrawString("\pBas”); 
TextMode(srcOr)}; 


AfficheCode(Speciale); 
DrawControls(pFenetre}; 


SetRect(&r, 9, 9, 233, 240); 
EraseRect(&r); 
TEUpdate(&pFenetre->portRect, hTexte); 


EndUpdate( pFenetre }; 


SetPort( savePort }; 
} 


rettiteneaneammannanmenmennnennenténeennennen / 


Curseur() 

{ 

Point Pt 

Rect “ 
CursHandle h; 
GrafPtr savePort; 


GetPort(&savePort); 
SetPort(pFenetre); 


SetRect(&r, 9, 9, 233, 240); 


TEldle{hTexte); 
GetMouse(&pt); 
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Foro &r)) 


} 


h = GetCursor(iBeamCursor); 


SetCursor(*h); 


else InitCursort); 
SetPort(savePort); 


} 
/ 
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Couper) 


{ 
S 


pecialeOf(); 
TECut(hTexte); 


Selection(); 


} 


eemenereunnnenennaaneennennenneannennenenensentt 1 


xaai 


Speci }; 
TECopy(hTexte); 
Selection(); 


} 


Jtetéertanesananenenenenennenaennententenannne | 


Coller() 


{ 
Special 


leOff); 


TEPaste(hTexte); 
Selection(); 


/tenenennencennenenenceneneentneentetteneenennte | 


Effacer() 


{ 
S 


TEDelete{hTexte); 


Selection(); 


} 


eemeeenneneancenennneentesenenneneneeneeneentenes | 


Clic{p,s) 

Point p; 

int s 

{ 

GrafPtr savePort; 
int centiCode; 
int bi 
ControlHandle Controle; 
Rect r 
GetPort(&savePort); 
SetPort(pFenetre); 
GlobalToLocal(&p}; 


if (cntICode = FindControl(p, pFenetre, &Controle)) 


} 


{ 

if (GetCRefCon(Controle) == nScroll) 
{ 
if (cntlCode == inThumb) 


{ 
TrackControl(Controle, p, OL}; 
Ajuste0; 


} 
else 
{ 
TrackControl(Controle, p, &Defile); 


} 
} 
else 
{ 
if (TrackControl{Controle, p, OL)) 
b = GetCRefCon(Controle); 
if(b == pComp) 


{ 
SetRect(&r, 9, 9, 233, 240); 


PoliceComplete(); 
} 
else 
for(i=0;i<9;is++) 
{ 
SetCtlValue(Ctri[i], Non); 
} 
SetCtIValue(Ctri[b], Oui); 
Police = t{b]; 
ChangePolice); 
} 


else 


{ 
if PtinRect(p, &(“hTexte).viewRect)) 
{ 


SpecialeOfK); 
TEClick(p, s != 0, hTexte); 
AfficheCode(Speciale); 


} 
else SelSpeciale(p}; 


} 
SetPort(savePort); 
} 


[eeneennnnennennenteneneneenmaammennennnn / 


Active(a) 
Boolean a; 


{ 

if ve 
TEActivate(hTexte); 
TEFromScrap{); 
InsertMenu(menu, 0}; 


DeleteMenu(dce->dCtlMenu); 
DrawMenuBar(); 


} 


Jreeteneenaneanesianaassenmenensennnenneansunnentes | 


AuRevoir(a) 
Boolean a; 

{ 

} 
uunnenaennenneaanéneaneennasenenneenaennnesnes | 
Frappe(c) 

char c; 

{ 

SpecialeOfK(); 
TEKey{c, hTexte); 
Selection(); 

} 


reeanetensenenennenneenenanennenenenentemtenns / 


static Rect Fen= {50, 8, 322, 400}, 
scr = { 8, 233, 241, 249}, 
textV = (9,9, 240, 232}, 
text =(12, 12,237, 229}, 
rb = (16, 262, 32, 298 }; 


GetPort(&savePort); 


pFenetre = NewWindow OL, &Fen, “\pPom's - Stricto 
sensu", Oui, noGrowDocProc, -1L, Oui, OL ); 


((WindowPeek)pFenetre}->windowKind = 
dœæ->dCtiRefNum; 
dce->dCtIWindow = pFenetre; 


SetPort(pFenetre); 


Ctrl[9] = NewControl(pFenetre, &scr, "\p", Oui, 0, 0, 0, 
scrollBarProc, nScroll); 

SetRect(&r, 256, 248, 385, 265); 

Ctri[10) = NewControl(pFenetre, &r, "\pPolice 

Complète", Oui, 0, 0,1, pushButProc, pComp}; 


Ctrif0] = NewControl(pFenetre, &rb, "\p9", Oui, 0, 0,1, 
radioButProc, t9); 

rb.top += 16; 

rb.bottom += 16; 

Ctrl[1] = NewControl(pFenetre, &rb, “\p10", Oui, 0, 0, 1, 
radioButProc, t10}; 

rb.top += 16; 

rb.bottom += 16; 

Ctrl[2] = NewControl(pFenetre, &rb, “\p12", Oui, 0, 0, 1, 
radioButProc, t12); 

rbtop += 16; 

rb.bottom += 16; 

Ctrl[3] = NewControl(pFenetre, &rb, “\p14", Oui, 0, 0, 1, 
radioButProe, t14); 

rbtop += 16; 

rb.bottom += 16; 

Ctrlf4] = NewContro(pFenetre, &rb, “\p18", Oui, 0, 0, L 
radioButProc, +18); 

rbtop += 16; 

rb.bottom += 16; 

Ctri[5] = NewControl(pFenetre, &rb, "\p24", Oui, 0, 0,1, 
radioButProc, t24); 

rbtop += 16; 

rb.bottom += 16; 

Ctr1[6] = NewControl(pFenetre, &rb, "\p36", Oui, 0, 0, 1, 
radioButProc, +36); 

rbtop += 16; 

rb.bottom += 16; 

Ctrl{7] = NewControl(pFenetre, &rb, “\p48", Oui, 0, 0,1, 
radioButProc, t48); 














rbtop += 16; 

rb.bottom += 16; 

Ctri[8] = NewControl(pFenetre, &rb, "\p54", Oui, 0, 0, 1, 
radioButProc, +54); 


Tailles{nPolice); 
PoliceComplete); 
SetPort(savePort); 
} 


Jemetnmenennennennenanannnenanentnannnnnes | 


InitMenu() 


{ 

dce->dCtiMenu = menulD = CalcResource(0); 
menu = NewMenu(menulD, “\pPolice"}; 
AddResMenu(menu, FONT'); 

Defaut(); 

} 


eemenennensenenmennennesenneensnenennennennes | 


TrMenu(n) 

int Li 

{ 

| St255  cArticle; 

| Checkltem(menu, aPolice, Non); 
aPolice= n; 

Checkltem(menu, aPolice, Oui); 
Getltem(menu, aPolice, &cArticle); 
GetFNum(&cArticle, &nPolice); 
Tailles(nPolice); 
ChangePolice(); 

HiliteMenu(0); 

} 


/eeeeenennennennenenanennennenneenteneeneentenentes / 


Defaut() 

{ 

register int Compteur; 
register int à; 

Str255 cArticle; 
Compteur = CountMItems(menu); 
for (i= 1 ; i< (Compteur + 1) ; i++) 





{ 

aPolice = 0; 

Getltem(menu, i, &cArticle); 

if TUCompString{"\pTimes", &cArticle) == 0) 
{ 


aPolice = i; 
. bre 


} 

if (a Police) 
{ 
Checkltem(menu, aPolice, Oui); 
Getltem(menu, aPolice, &cArticle); 
GetFNum(&cAticle, &nPolice); 

} 

else 


{ 
for (i= 1 ; i < (Compteur + 1); i++) 
{ 


Getltem(menu, i, &cArticle); 
if (UCompString("\pChicago", &cArticle) == 0) 
{ 


aPolice = i; 
break; 
j } 
Checkltem(menu, aPolice, Oui); 
Getltem(menu, aPolice, &cArticle); 
| “satin &nPolice); 
} 


Jrenenemnannenanannannenennnnannencenmenenantnenene | 
Tailles(nP) 

register int  nP; 

{ 

| register int ji; 

for(i=0;i<9;i++) 


{ 
SetCtiValue(Ctri[il, Non); 
if (RealFont(nP, t{i])} 


{ 
| HiliteControl(Ctrl[i], 0); 
} 
else 
{ 
HiliteControl(Ctri[il, 255); 
} 
} 


tPolice = 0; 
forfi=5;i>-l;i-) 





{ 
if (RealFont{nP, t{i])) 


{ 
| SetCtiValue(Ctri[i], Oui); 
tPolice = t{i]; 
j break; 


} 
if (Police == 0) 


RE 
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for(i=6;i<9;i++) 
{ 
if (RealFont{nP, t{i])) 


SetCtIValue(Ctri[il, Oui); 
tPolice =t{i]: 
break; 


} 
} 
} 


"nunennnnnnnenensennansennenenneenennsenseseesne / 
ChangePolice() 

{ 

Rect r; 

FontInfo f 

GrafPtr savePort; 


GetPort(&savePort); 
SetPort(pFenetre); 


SpecialeOf{(); 
TextFont(nPolice); 
TextSize(tPolice); 
GetFontInfo(&f); 
(*“hTexte).ixFont = nPolice; 
(“hTexte).txSize = tPolice; 
("“hTexte).fontAscent = f.ascent; 
(“hTexte).lineHeight = f.ascent + f.descent; 
Vue(); 
Selection(}; 


SetRect(&r, 9, 9, 233, 240); 
InvalReat(&r); 
SetPort(savePort); 

} 


JunmenenmeneannenaanenNEHHMEHENHMMEENNEEEES | 
Selection() 

{ 

register int LigneHaut, LigneBas, Ligne; 


SetVScrollEdit(}; 
Ajuste(); 


LigneHaut = GetCt]Value(Ctrl{9]); 

LigneBas = LigneHaut + nLignes; 

if ((**hTexte).selStart < 
(“hTexte).lineStarts[LigneHaut] | | 
(“hTexte).selStart >= 
(“hTexte).lineStarts[(LigneBas]) { 
for (Ligne = 0; (*hTexte).selStart >= 

(“hTexte).lineStarts{Ligne}; Ligne++); 

SetCtlValue(Ctrl(9], Ligne - nLignes / 2); 
él 

} 


J'eeeemeteeneenenmenneeneaaenmenennennennennnennnn | 


SetVScrollEdit() 
{ 
registerint n; 


n= (*hTexte).nLines-nLignes; 


if ((**hTexte).teLength > 0 && 
({("hTexte).hText)){("hTexte).teLength-1]== 
n++; 


SetCtiMax(Ctri[9], n >07 n:0); 
} 


Jenenanannenenannennennnennenennennétenéateente à 
AjusteO 
int oldScroll, newScroll, delta; 


oldScroll = (“hTexte). oui 40p- 
(“hTexte).destRect.top 

newScroll = GeCuIValueCtr1(9)) , 
(“hTexte).lineHeight; 

delta = oldScroll - newScroll; 

if (delta != 0) TEScroll(0, delta, hTexte); 

} 


Je 


Vue() 





nenseatasenennaneaneenesns | 


{ 
nLignes =((*hTexte).viewRect.bottom- 


(“hTexte).viewRect.top)/(**hTexte).lineHeight; 


TECalText(hTexte); 
} 


aéteneneeessemmenencenssnenensenmneneeneeeente | 


void Defile(Controle, Code) 
ControlHandle Controle; 
int Code; 
{ 
int TailleP; 
int  DefileA; 
if (Code =z 0) 


return ; 


TailleP = ((*hTexte).viewRect.bottom- 
(“hTexte).viewRect.top) / 
(“hTexte).lineHeight - 1 


switch (Code) { 
case inUpButton: 
DefileA = -1; 
break; 
case inDownButton: 
DefileA = 1; 
break; 
case inPageUp: 
DefileA = -TailleP; 
break; 
case inP. 
DefileA = TaileP; 
break; 
SetCtIValue( Controle, GetCtIValue(Controle)+ 
DefileA }; 
pts 


/stetéteennenteneene manne tente ne ne nee men 


AfficheCode(n) 
Byte 

{ 

GrafPtr savePort; 


GetPort(&savePort); 
SetPort(pFenetre); 


TextFont(geneva); 
TextSize(10); 


if(n) v=s{n-1} 
else 


{ 
if ((*hTexte).selStart == (“*hTexte).selEnd) 
{ 


if ((*hTexte).selStart == 0) 


v=0; 


else 
v= “*((“#hTexte).hText) + (“hTexte).selStart - 
1; 
} 


else 
v = "((C'hTexte).hText) + (*hTexte).selStart); 

} 
NumToString((long)v, &code); 
SetRect{(&r, 317, 184, 380, 193); 
EraseRect(&r); 
MoveTo(317, 192); 
DrawString(&code); 


code{0] = 2; 

w=v/16 

codef[1] = h{w]; 

code{2] = h{v - (w * 16)}; 
SetRect(&r, 338, 197, 380, 206); 
EraseRect(&r); 

MoveTo(338, 205); 
DrawString{&code); 


code[0] = 3; 

x=v/64; 

codef1] = h{x}; 
waæ=(v-(64*x)) / 8; 

code[2] = h{w]; 

code[3] = h{v - (64 * x) -(8 * w)]; 
SetRect(&er, 302, 210, 380, 219); 
EraseRect(&r); 

MoveTo(302, 218); 
DrawString(&code); 


code[0] = % 
code(5] = "'; 
for(x=0;x<8;x++) 


W=v; 

if(x>3) i=2; 

else i= 
if (w & b{x]) nu +i]="1; 
else codef[x + i] = 0"; 

} 

SetRect&r, 315,223, 380, 232); 

EraseRect(&r); 


MoveTo(315, 231); 
DrawString(&code); 


SetRect(&r, 8, 246, 248, 264); 
EraseRect(&r); 


if(v >31) 
{ 
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ConcertWare+ est un logiciel musical 
pour Macintosh composé de trois 
applications : la première permet de créer 
et de travailler les partitions, la seconde 
est conçue pour l’édition du son des 
instruments, la troisième joue l’œuvre. 

De l’édition des partitions au pilotage 
d’un instrument électronique, l’ensemble 
est étonnant. 


Notre version 4.05 de ConcertWare+ a été testée sur un 
Macintosh II et un Macintosh Plus connecté par l’interface 
MIDI à un piano numérique Yamaha. Précisons d’emblée 
qu’un instrument MIDI n’est pas indispensable pour 
l’utilisation de ConcertWare+ même si c’est un 


prolongement naturel ; il existe en effet deux versions : 
ConcertWare+ et ConcertWare+ MIDI. 


Présentation 


ConcertWare+ est livré avec une documentation demi- 
format d’une centaine de pages en anglais bien entendu, 
plus un fascicule de vingt pages pour la version MIDI. Si 
l’ensemble est bien fait, bien présenté et agrémenté de 
copies d’écran, il n’en reste pas moins qu’une version 
française simplifierait les choses. Même si le maniement 
est assez intuitif, le recours à la documentation s’impose. 

On regrette que l’aspect MIDI soit réduit au nécessaire, 
malgré le fichier texte qui figure sur le disque. Il y a tout ce F 
qu’il faut pour s’en sortir, mais il n’y a rien de trop. Midi Writer : édition — audition — de partition 





LE s 
MoveTo(8, 260); l a 
oveTo(8, ; . case 1: 
for (i= 0 ;i < 231 ;i++) Fran { 
{ ; { DrawString{"\pMajuscule “); 
if(væ=sili" 6) break; DrawString{"\pOption - Majuscule “); DrawChar(""}; 
} DrawChar(*"); DrawChar(st{(i * 6) + 3 + j]); 
j=0; DrawChar(st{{i * 6) + 3 + j]); DrawChar(""); 
Boucle: DrawChar(*’}; DrawString{"\p, puis "); 
switch (st{(i* 6) + 1 +j]) } switch (st{(i* 6) + 4 + j]) 
{ break; { 
+ Impossible: } case 0: 
DrawString{"\pUtilisez le ‘Copier/Coller"}; Lu bd art“); 
case Deux_fois : DrawChar(st{(i* 6) +5 + j]}; 
break; À { DrawChar(*'); 
case Une_fois : switch (st{(i* 6) + 2 + j)) } 
break 
a (st{(Gi* 6) +2 + j]) case 0: case 1: 
{ { 
case D: DrawChar(”; DrawString{"\pMajuscule "); 
{ DrawChar(st{(i* 6) + 3 +j]); DrawChar(”"); 
DrawChar("); | DrawChar(*’); DrawChar(st{(i* 6) + 5 + j}); 
DrawChar(st{(i* 6) +3 +j]}; DrawString{"\p, puis "); DrawChar("'}; 
DrawChar*'}; switch (st{(i* 6) + 4 + j]) } 
DrawString("\p seul"); { } 
} case 0: } 
break; { break; 
case 1: DrawChar(“"}; case 2: 
{ DrawChar(st{(i* 6) + 5 + j]}; { 
DrawString("\pMajuscule "); DrawChar(""); DrawString{"\pOption ")}; 
DrawChar(“"}; 4 s } DrawChar(""}; 
DrawChar(st{(i * 6) + 3 + j]); break; DrawChar(st{(i * 6) +3 + j]); 
DrawChar(“'}; case 1: DrawChar(”}; 
{ DrawString{"\p, puis "}; A 
break; DrawString("\pMajuscule "); switch re Rare ÿ) n 
case 2: DrawChar(""’); { nu 
{ DrawChar(st{(i * 6) + 5 + j]); case 0: Ÿ 
DrawString{"\pOption "}; DrawChar(”'); { à 
DrawChar(“); } DrawChar(“"); © 
DrawChar(st{(i * 6) + 3 + j]); } DrawChar(st{(i * 6) + 5 + j]); à 
DrawChar("'}; } DrawChar("'}; ta 
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Disons qu’une connaissance de la norme MIDI n’est pas un 
handicap à la bonne utilisation de ConcertWare+. 


Bon point, les programmes ne sont pas protégés et 
s'installent sans difficulté sur le disque dur, il suffit 
d'ajouter au Système la police Sonata livrée sur le même 
disque. Notons à ce sujet que ConcertWare+ est utilisable 
sur disquette 3,5" sans que ce soit la galère. 

Ce programme fonctionne sur tout Mac avec au minimum 
512Ko de RAM, sauf sur le Mac XL (Lisa). En l’absence 
d’instrument MIDI, la connexion à votre chaîne HiFi est 
une quasi-nécessité, le haut-parleur intégré au Mac étant 
plutôt un ‘bas-parleur’ qui ne brille pas par sa fidélité. 


ConcertWare+ se compose de trois programme principaux : 
MidiWriter pour l'écriture des partitions, MidiPlayer 
pour l’exécution des musiques et Instrument Maker 
pour modifier l’orchestre (un menu offre le passage direct 
d’une application à l’autre sans retour au Finder). 





MidiWriter : la partition 





L'écriture d’une partition avec MidiWriter tient du jeu 
d’enfant, le souci des programmeurs ayant clairement été la 
simplification : au choix, les notes seront saisies à l’aide de 
la souris, du clavier du Macintosh ou du clavier MIDI 
connecté. En ce qui nous concerne, le clavier du Yamaha a 
bien servi. 

À tout instant, il sera possible d’entendre sur le Mac —ou 
sur l’instrument MIDI connecté— la partition, un morceau 
de partition ou même telle et/ou telle voie. 


Les possibilités 


Première chose, installer les portées : nous avons huit 
voies disponibles qu’il est possible d’installer sur 1 à 8 
portées ; dans un souci de clarté à l’écran, il est possible de 
demander par un simple clic l'affichage isolé de la voie sur 
laquelle on travaille. 


é File Play MIDI Transfer 


BUMDI BD 0 0 À 


Flight of the Bumblebee 
Nicolay Rimsky-Korsakov (1844-1906) 
Rimsky-Korsakou wrote this popular showplece In 1888. 
it Is part of the obscure but colorful opera “The Legend 
of Tsar Saltan." 


_— L\% 5 oice 1 CJioice 5 
EF : ŒUoice 2 [JUvice 6 

fi A Voice 3 CJüoice ? 
Km D] Voice 4 Cjüoice 8 

















AVEC CE 
PROGRAMME MÊME 
LES NOTES SONT 

PERSONNALISÉES 


DE 


Nous avons les portées, choisissons les clefs : 


= 


Les graphismes de la police Sonata sont très satisfaisants à 
l'écran et l’impression sur une Laser Writer est un régal. 
Bien que la Laser Writer ne connaisse pas la police Sonata, 
l'impression se fait par vecteur et non en bitmap comme la 
copie d'écran ci-dessus. 

Bien entendu, il est possible de changer de clef en tout 
endroit de la partition. Choisir maintenant la tonalité relève 
à nouveau d’un simple clic, dièses et bémols s’inscrivant 
alors automatiquement. Idem pour la mesure 2-2 6-8 etc. 
En ce qui concerne le tempo, la souris résoud à nouveau la 
question, à tout endroit de la partition ; voici par exemple 
un ralentissement : 


J12 J:100 20 _ 


On en vient alors à la saisie des notes, par l’un des trois 
moyens indiqués. Choisir la durée —croche, noire, etc.— 
puis l’altération accidentelle éventuelle —dièse, bécare 
etc.— et enfin la hauteur. La note s’inscrit où il convient 
avec insertion automatique des barres de mesure en fonction 
de ce qu’on a indiqué à la clef. 

Dans l’une des 19 partitions exemples de ConcertWare+, 
on trouve des double-croches en quantité, de quoi délier les 
doigts, il s’agit du Vol du Bourdon de Rimsky Korsakov : 





D'accord, présentées ainsi, c’est peu lisible. Qu’à cela ne 
tienne, un clic relie tout ce petit monde : 
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Mais oui, les triolets sont aussi prévus, avec une notation 
standard et s’ils gênent le pianiste débutant, ConcertWare+ 
nous joue ça en faisant semblant de ne pas souffrir : 


L 3 


L'essentiel de l’arsenal d’écriture musicale est là, y compris 
reprise ou da capo. Un exemple tiré de Scott Joplin : 





On voit ici que les accords ne posent pas plus de problème 
à MusicWriter qu’au “programmeur de partition”. Plus fort, 
l'enregistrement peut se faire en temps réel depuis un 
instrument MIDI, le Mac devient séquenceur et offre un 
métronome permettant de se caler sur les mesures ; il faut 
avoir précisé la résolution voulue de telle façon que des 
irrégularités dans le rythme ne conduisent pas à trop de 
huitièmes de soupir. 


Que nous manque-t-il encore, les nuances ? Pas de 
problème, de fff à ppp en huit pas et sur votre instrument 
MIDI en 127 pas ! 

Côté présentation de la partition, on n’a pas oublié que les 
notes ne sont pas toujours rondes. 


SE 


Le MacWrite de la double croche 


MidiWriter est plus qu’un logiciel à jouer des notes, c’est 
véritablement un ‘traitement de musiques’ comme Word est 
un traitement de textes. Ce programme peut être vu comme 
un utilitaire de PAO pour travailler les partitions et les 
éditer, il n’est pas uniquement l’outil du musicien. 

Entre le musicien averti qui s’intéresse au fond et l’éditeur 
qui s'intéresse à la qualité des partitions imprimées, 
MidiWriter séduira aussi celui qui, sans être musicien, 
saisit en quelques minutes une partition pour le plaisir des 
oreilles ou pour lui faire subir tous les outrages. 

Notons à ce sujet que J.-S. Bach est un réel plaisir sur 
micro ; à croire qu’il avait écrit pour les sonorités 
électroniques du Mac, des synthétiseurs et autres pianos 
numériques. Le côté “petite horloge bien réglée” va bien à 
ConcertWare+ : le Mac bien tempéré. 


La souplesse du Mac 


Si votre œuvre se chante, pas de problème non plus mais 
là, ConcertWare+ fait plus fort : après avoir choisi la 
police et le corps du texte, on clique vers la première note 
et on tape les syllabes attachées à cette note. Puis 
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tabulation pour passer à la suivante, etc. L’espacement des 
notes variera automatiquement en fonction du texte comme 
ici entre les trois premières croches : 





Vous avez dit souplesse ? 


Qu’attend-on d’un ordinateur, si ce n’est une simpli- 
fication : l’ensemble de la partition est saisi horizon- 
talement, les retours à la ligne n’apparaissant que lors de 
l’impression qui gère la mise en page. 

Changer de tonalité, remonter toutes les voies d’un tierce, 
en descendre une d’une octave ou un demi-ton, copier une 
voie et la coller plus loin ne sont qu’affaire de clics. Copier 
toutes les voies et les coller ailleurs mais en les changeant 
de portées, le clic toujours. 


Bien entendu, si vous passez d’une mesure 2-4 à une 3-4 ou 
autre, ConcertWare+ se charge de rectifier la position des 
barres de mesure. Si une noire se trouve alors à cheval sur 
deux mesures, elle sera —en fonction des temps— divisée 
en une croche pointée en fin de première mesure et une 
double croche en début de deuxième, avec liaison bien 
sûr. 

Vous avez un Mac II, quelle chance, comme sur la 
couverture de ce numéro chaque voie peut avoir sa 
couleur. 

Copie d’écran partielle ou complète, décidément on a pensé 
à tout, rien de manque mais. 

Mais on regrettera une certaine lenteur dans le déplacement 
horizontal sur les portées avec les ascenceurs. Pour aller à 
la mesure 37, il est préférable d’utiliser le menu ad hoc que 
de scroller note par note ou mesure par mesure. Sur le Mac 
IL, c’est moins gênant. 
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Midi Player : l’exécution 


MidiWriter pouvait exécuter une partition en cours de 
travail mais MidiPlayer est plus rapide puisqu'il n’affiche 
pas les partitions. 

Sur le haut-parleur interne, comme sur la chaîne HiFi, il 
est capable de jouer quatre voies seulement sur les huit. 
Cette limitation n’existe évidemment pas lorsqu'il pilote 
un instrument MIDI. 


PETIUR 


Des icônes apparaissent indiquant les instruments choisis 
mais, malgré les indications dans la partitions, MidiPlayer 
laisse la possibilité d’en changer, même en cours 
d'exécution. Comme un piano numérique n’a pas 
nécessairement les sonorités que le “programmeur musical” 
a choisies, les changements d’instruments provoquent 
parfois des passages inattendus en clavecin ou célesta.… La 
solution est encore là, demander simplement que les 
changements d’instruments ne soient pas envoyés sur 
l'interface Midi. 

On changera, toujours avec la souris, la vitesse 
d’exécution, le niveau sonore sur le haut-parleur interne et 
les voies jouées. 


Enfin, la synchronisation avec une boîte de rythmes ou un 
autre Mac par exemple est assurée : votre Mac sera Maître 
ou Esclave dans son exécution grâce à la transmission de 
l'horloge entre les éléments Midi. Pas de cacophonie. 


Instrument Maker : 
la lutherie 


Ici se crée l’orchestre. 

ConcertWare+ est livré avec 115 instruments, tous 
éditables avec la souplesse Mac. On peut ainsi créer de 
nouvelles sonorités qui seront exploitées par MidiPlayer ou 
MidiWriter. 

L'édition se fait par dessin direct de l’onde à l’écran et 
calcul en fonction des harmoniques demandées et de leurs 
niveaux relatifs. On intervient également sur le vibrato, en 
durée et en amplitude, sur le “sustain”, la variation du 
niveau sonore en fonction du temps (enveloppe). 


Inutile de réinventer l’eau tiède : par le copier/coller, on 
peut concevoir un instrument en partant de la forme d’onde 
de la contrebasse travaillée avec les harmoniques du 
bourdon, avec l’enveloppe de la clarinette, le vibrato de la 
guitare et une icône basée sur celle du tuba. Le résultat 
n’est pas garanti concernant cet exemple mais il donne une 
idée de la puissance de l’ensemble. 

Avons-nous dit qu’à tout moment on peut essayer la 
sonorité sur les 76 notes du clavier à l’écran ? 









Liaison MIDI 


Sur la version ConcertWare+ MIDI, la gestion de la liaison 
avec les intruments connectés est aussi simple. Dans 
l'exemple ci-dessous, on a demandé une ‘vélocité” de 8 (sur 
127 pas) ce qui nous donne un ppp (mais c’est plus précis 
que l’option ppp à l’écran). 

On jouera avec l’instrument 3 de notre Yamaha (bien 
entendu, on peut jongler à loisir sur les numéros de voies 
MIDI) avec un volume de 10 et la pédale douce. 


PPP 13 Volurne(10)Soft Ped. On 


a 


L’ensemble des 127 “macros” MIDI, autrement dit les 
séquences hexadécimales à envoyer aux instruments pour 
les configurer, est éditable de façon simple, les paramètres 
attachés étant demandés dans une fenêtre de dialogue 
classique. On peut essayer une macro lors de son édition 
sans devoir l’insérer dans une partition et la jouer. 

Voici les macros connues de ConcertWare+ lorsque vous le 
recevez : Play c — All off — Mod. — Breath — Foot — 
Port. — Data — Volume — Balance — Pan — Expr. — 
Data Inc. — Data Dec. — Sustain — Sustain Off — Port. 
On — Port. Off — Sost. On — Sost. Off — Soft Ped. On 
— Soft Ped. Off — Tremolo On — Tremolo Off — 
Chorus On — Chorus Off — Celeste On — Celeste Off 
— Phaser On — Phaser Off — LC On — LC Off — 
Omni Off — Omni On — Mono On — Poly On — 
Restore. 


Souplesse toujours, on peut décider que les ordres MIDI 
apparaîtront ou non à l’impression et/ou à l’écran… 


Précisons enfin que deux jeux de paramètres par défaut sont 
prévus : les très classiques synthétiseurs Casio CZ-101 et 
Yamaha DX-7. 


À 700,00 F la version de base et 1 800,00 F la version 
Midi, nul doute que le possesseur de Mac un tant soit peu 
attiré par la musique ‘craquera’. 

Ayons une pensée émue pour le musicien qui débute, 
coincé par un rythme qu’il ne sent pas, bien qu’il compte 
courageusement de 1 à 16 dans chaque mesure : saisir la 
partition, demander Play et entendre enfin ce qu’il fallait 


comprendre. 
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Bon ça y est j’ai craqué, devinez pour 
quoi ? Pour un Mac Ilcx. Quelle 
merveille ! Y a pas à dire Apple fait 
fort à chaque nouvelle machine, et là 
il a fait très fort. Tout y respire la 
qualité : qualité de son Look, il est vrai 
que ça compte et qualité de ses 
composants internes surtout. 


Quand on ouvre un Ilcx, on est devant 
une sorte de “meccano” haut de 
gamme, où il suffit de dévisser une 
seule vis pour tout démonter. Et que 
croyez vous que je fis dès que je le 
pus ? Je l’ai démonté évidemment. 
Tout se déboîte sans problème, et 
surtout tout se remboîte aussi 
facilement. Et pour la première fois de 
ma carrière de démonteur invétéré, j'ai 
pu tout remonter sans qu'il ne reste la 
pièce dont on ne sait quoi faire, et qui 
apparemment était en trop ! En fait le 
contenu se limite à cinq pièces : le 
disque dur interne, le lecteur de 
disquette 1,44 Méga, l’alimentation, 
et la carte-mère, et le haut parleur. 


Commençons, par la carte mère : pas 
le moindre petit fil n’y traîne, c’est 
propre et limpide. En son centre on y 
trouve le 68030 cadencé à 15,7 Mhz. 
Ce processeur a l’avantage par rapport 
à celui du Mac II de base (68020) de 
posséder d'emblée la PMMU dont 
Alain Raynaud vous a parlé dans le 
précédent numéro. C’est ce co- 
processeur qui permettra d’utiliser la 
pleine puissance du système 7, 
mémoire virtuelle incluse. À lui aussi 
AU/X ou pour ceux qui ne le sauraient 
pas Unix version Apple. Multitâche, 
tout est possible pour ce petit bijou. 
Et pour épauler le 68030 dans les 
calculs, vient avec le 68882 le 
coprocesseur arithmétique. Pour qui a 
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déjà augmenté la mémoire d’un Mac 
II, le Ilcx est ici aussi d’une facilité de 
mise à jour, étonnante. Plus besoin de 
tout mettre ventre en l’air pour accéder 
aux connecteurs de barrettes RAM. À 
ce propos vous vous souvenez je vous 




















Ariel Sebban 


avais prédit une chute spectaculaire de 
ces composants, c’est fait. On trouve 
actuellement aux États-Unis des 
barrettes de un Méga à 135 dollars soit 
environ 1000 francs. À Paris on 
commence à 1400 francs. 





Parlez vous SQL ? 





Vous avez certainement entendu parler 
d’Oracke pour Macintosh. De même 4D, 
Omnis 5, FoxBase+ Mac, annoncent 
tous dans leurs produit une interface 
capable de communiquer avec les bases 
de données SQL. Apple lui même n’est 
pas en reste puisqu'il est prévu dans le 
sysème 7 une interface CL/I. Alors 
qu'est ce que tout cela peut bien vouloir 
dire ? 


SQL est l’abréviation de Standard Query 
Langage. (C’est un langage 
d'interrogation des bases de données 
Oracle. Ce type de base est devenu un 
véritable standard puisqu'’utilisé par près 
du quart du parc installé des gros 
systèmes. Ce langage est quasi 
indépendant de la machine, et donc 
universel. 


Ainsi un Mac doté de SQL, grâce à une 
interface adéquate pourra interroger 
n'importe quelle base de ce type sur 
n'importe quel système la supportant. 
Une base de donnée Oracle est organisée 
non pas en fiches mais en tableaux dont 
le système gère les liaisons de manière 
transparente. L'extraction des données 
se fait en demandant un résultat sans se 
préoccuper de la démarche à suivre pour 
l'obtenir. En quelque sorte on demande 
simplement “ telle 





je voudrais 
information” sans avoir besoin de définir 





la procédure pour l’obtention de celle-ci. 
Ainsi on peut imaginer l'exemple 
classique d’une liste d'employés 
occupant un poste dans l’entreprise, et 
qui perçoivent un salaire. L'organisation 
de la base se fait donc en une table des 
employés, une table des postes, et une 
table des salaires. Chaque fiche est en 
quelque sorte une ligne de l'accolement 
de ces tables. L’interrogation des 
employés touchant un salaire supérieur à 
x, Se fait en demandant ‘SELECT 
“noms” FROM ‘Fichier’ WHERE 
“salaire” > x’. S'il est vrai que jusqu'ici 
rien de très différent par rapport aux 
éditeurs de recherches qu’on trouve de 
plus en plus sur les micros, la structure 
réelle du fichier est complètement 
différente puisqu’en fait chaque table du 
fichier est totalement indépendante et 
peut donc appartenir à d’autres fichiers. 


La notion elle-même de fichier n'existe 
plus et l’on parlera plutôt d’ensembles. 
L'information recherchée étant 
l'intersection de ces ensembles. Qui a dit 
que Les maths modernes ne servaient à 
rien ? Ces systèmes d'organisation 
permettent de gérer d'énormes quantités . 
de données, comme par exemple 
l’ensemble du fichier des cartes grises 
sur le territoire français, les recherches 
s faisant dans des temps étonnants. 
L'interface SQL, disponible désormais 
sur Les micros dont le Mac pameen 
d'accéder à cette puissance. so. 
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Et cela devrait continuer à chuter 
d’autant que bientôt les RAMSs de 4 
Mégas vont commencer à être 
diffusées en grande quantité. Et le IIcx 
possédant 8 connecteurs, cela ferait 32 
Mégas possibles sur la carte-mère. 
Jusqu’où irons nous ? Mais ne croyez 
pas que cela soit inutile, j’ai eu le 
plaisir de tester des programmes 
graphique couleur de dernière géné- 
ration, et dites-vous qu’il ne s’agit que 
d’un début, et bien ces programmes 
sont déjà très à l’étroit dans 4 Mégas, 
si l’on veut en tirer le maximum ! 


Sur la carte-mère nous trouvons aussi 
les ROMSs soudées et un connecteur de 
mise à jour de ces ROMSs. Apple 
prétend que cette technique permet 
d’abaisser les coûts, il faut plutôt y 
voir le besoin de limiter les risques de 
marché noir des ROMSs du Mac. Et 
pour compléter le tout, les trois slots 
NuBus. Pour la grande majorité des 
utilisateurs, cela suffit largement. Un 
sera obligatoirement occupé par une 
carte vidéo, les deux autres vous 
pourrez en faire ce que vous voudrez. 
Trois slots suffisent d’autant plus 
qu’on retrouve aussi les autres 
connecteurs des deux ports série, deux 
ports ADB, et le port SCSI. En prime 
on trouve un connecteur de lecteur de 
disquette externe, puisque le Ilcx, 
n'accepte pas de deuxième lecteur 
interne. | 


À propos du nombre des ports, ce 
qu’on a reproché longtemps sur le 
Mac à savoir sa fermeture, sur les 
machines du monde IBM tous ces 
connecteurs d’origine sur Mac, sont en 
option, et donc occupent autant de 
slots quand ils existent. Que dire 
encore de cette merveille, que le haut 
parleur est bien plus grand et procure 
une qualité de son tout à fait honnête, 
que le jack haut parleur est stéréo, et 
qu’enfin l’alimentation de 90 watts est 
largement dimensionnée pour ali- 
menter les éventuelles cartes addi- 
tionnelles. L’intérieur du boîtier est 
complètement recouvert de peinture 





Radius : la carte QuickColor Graphics 
Accelerator 





| Radius, distribué par P-Ingénierie à Paris, annonce une nouvelle carte 
graphique pour Macintosh II : la Radius QuickColor Graphics 
Accelerator. ee 





Grâce à cette carte, QuickDraw 32 bits est accéléré dans un rapport de 1 
à 6 pour les opérations graphiques, déplacement de fenêtres, défilement 
de texte, remplissage de formes, affichages d'images, etc. 


| L'importante accélération des affichages graphiques a été rendue 
possible grâce à l'utilisation du microprocesseur RISC VL86C010 et au 
NuBus Block Transfert (transfert par blocs sur le Nubus) Macintoshien. 
Rappelons que les processeurs RISC sont dotés de peu d'instructions 
mais que, s'ils ne savent pas faire grand chose, ils le font vite, très vite. 


que le Macintosh II. 





| La vitesse a un prix : 7 990 FHT. 


pour réduire les risques de rayon- 
nements parasites. Sain et propre, 
telle est véritablement l’impression 
d’ensemble qu’on peut en retirer 
lorsqu'on a autopsié un Mac Ilcx. 


Voilà pour la bête. Et maintenant il 
faut lui à donner à manger. Je suis 
donc allé faire un tour à Boston, 
puisqu'il s’y tenait salon. Cette année, 
rien de transcendant ne fut présenté à 
cette MacWorld Expo. 


Tout ce qui est à noter vient de 
partenaires Apple, la pomme se 
réservant pour Apple Expo qui 
inaugure cette année le nouveau CNIT 
à la défense. À ce sujet l’annonce la 
plus importante sera celle du portable, 
qui de rêve pour certains devient enfin 
réalité. Je vous en ai parlé il y a deux 
numéros, et on j'y reviendrais dès que 
je l’aurais eu dans les mains. Mais 
surprise de dernière minute, Apple doit 
présenter le Mac Ilci, qui n’est autre 
qu’un Ilcx cadencé à 25 Mhz, et 
possédant en série une interface vidéo 
étendue, laissant libre les trois slots 
Nubus. Bref un Ilcx haut de gamme. 
Et moi qui pensait qu’avec mon IIex, 
j'étais à jour pour au moins 6 mois ! 
Bon reprenons notre revue de Boston. 


Le processeur RISC de la carte QuickColor échange les données avec la 
mémoire vidéo à raison de 27 Mo par seconde, soit 7 fois plus rapidement 





Les périphériques 


Pour les allumés de Space Invaders et 
autres Flight Simulator, j’ai trouvé un 
MouseStick, qui n’est autre qu’un 
joystick ou levier de commande et 
manche à balai pour Mac SE, et toute 
la famille Mac II, qui se branche sur le 
bus ADB. Il est vendu 129,95 $US 
par la société canadienne Advance 
Gravis. 


Intéressant aussi le Mac UnMouse 
qui est une tablette digitale compacte à 
connecter sur un port ADB des Mac 
SE ou Mac II. On permet le contrôle 
du curseur, l’entrée des données 
graphiques et la sélection des touches 
de fonction. L'utilisation se fait en 
explorant le verre de la tablette, avec 
son doigt ou avec un stylo conducteur. 


Ses dimensions sont de 7,6 cm X 
11,43 cm et la résolution est de 1000 
x1000. Prix 690 SUS par Micro- 
Touch Systems Inc. 


Pour tous les gestionnaires de stocks : 
le Bar Code/Magnetic Stripe 
Combination Readers PC-3000. 
C’est un lecteur et encodeur de 
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code-barre, et de carte magnétique pour 
Mac SE, et toute la famille Mac II et 
Apple IIGS utilisant le port ADB. Le 
périphérique incorpore un micro- 
processeur qui supprime l’utilisation 
d’un logiciel de pilotage ce qui le rend 
très rapide à l’utilisation. Vendu 745 
$US l'unité complète par TPS 
Electronics. 


Dans le domaine du multimédia, ou le 
Mac explose on a pu voir entre 
autres : 


La carte 
RasterOps SFX 


C’est une carte 32 bits couleurs 
QuickDraw pour studio vidéo orienté 
Multimédia. En mixant les signaux 
vidéo d’une image graphique du Mac 
et une source vidéo extérieure, 
l’utilisateur pourra bien définir le 





Pour voir la vie 
en rose : 32 bits 
Color QuickDraw 






















nu ee d Mac Plus où SE 
n'avaient besoin que d’un bit pour 
nn allumé ou éteint. 


gérer que huit bits. Or comme chacun 
ne heure he 
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‘cette transparence laissant ce soin aux 





ue À QuickDraw n'était capable de 





signal dominant de 0 à 255 différents 
niveaux de dominance (le principe du 
32-bit ChromaKeying). 

Vidéo Composite, S-Vidéo (S-VHS) 
en entrée/sortie, RS-343 entrelacé 
RGB, NTSC, ou PAL en sortie. Cette 
carte permet aussi le contrôle de la 
transparence des pixels : pour chaque 
pixel à l’écran on peut définir un 
niveau de transparence différent, en 
utilisant les 8 bits du canal Alpha. Il 
est possible d’ajuster le signal de 
sortie afin de faire apparaître la barre 
de menu du Mac sur l’écran TV. En 
l’absence du signal genlock le SFX 
génère un autre signal automati- 
quement pour une meilleure synchro- 
nisation. 

Deux modèles de carte étaient pro- 
posées : la ColorBoard 232 (32 bits 
pour une résolution d’écran de 640 X 
480) ou la ColorBoard 224 (24 bits 
pour une résolution d’écran de 1024 X 
768). Vendu par RasterOps. 


Néanmoins Apple n’a pas implémenté 
les routines nécessaires à la gestion de 


développeurs. De plus le format de 
fichier procure une importante économie 
d'espace puisqu'une image peut 
théoriquement ‘atteindre 2 Mo sur le 
disque. La technique dite RLL (Run- 
Length Limited encoding) permet une 
économie substantielle de mémoire. Les 
grands éditeurs travaillent sur des 
nouvelles versions de leurs programmes 
pour tirer partie de toutes ces nouvelles 
possibilités. Mais comment faisaient 
alors les programmes qui avant cette 
mise à jours annonçaient la gestion de 
ces 16 millions de couleurs ? 





Tout simplement en trichant un peu. Il 
faut savoir que le système de couleur 
utilisé par Apple est tout simplement 
génial en ce sens qu’au lieu d’affecter 
une couleur à chaque point de l’écran, le 
système lit d’abord cetié valeur dans une 
table. Et si entre deux rafraîchissements 
vous modifiez la table, vous obtenez des 
couleurs par effet dé masques qui 
n'existent pas réellement en tant que 
Ce procédé particulièrement intelligent 
procure au Mac II une rapidité extra- 
ordinaire pour ce qui est de la gestion des 
images. 








La carte 
FrameGrabber 324 


Cette carte vidéo 32 bits couleurs pour 
la famille Mac II, accepte en entrée des 
signaux RGB (30 Hz), NTSC, et 
S-Vidéo et supporte les deux formats 
8 bits et 32 bits couleurs. La vitesse 
de capture de l’image est de l’ordre de 
1/30ème de seconde. Le Foyer (focus) 
est interactif, la digitalisation 
continue, et on peut sauvegarder ou 
couper l’image. La carte permet une 
amélioration importante du contraste 
d’image, la correction gamma et le 
réglage de la luminosité. Encore chez 
RasterOps. 


Et toujours chez RasterOps : Une 
carte qui va faire du bruit : la carte 24 
bits couleurs pour Mac SE30. Cette 
carte est destinée à piloter un écran 13 
pouces tel que l’écran haute résolution 
d’Apple. Si ce genre de carte existe 
depuis quelque temps déjà la grande 
nouveauté c’est qu’elle descend au 
dessous des 1000 dollars rendant 
désormais les 16 millions de couleurs 
plus accessibles. 


Jusque là ce type de carte coûtait entre 
trois et cinq mille dollars et en France 
on en trouve à partir de 30 000 francs 
HT. Au prix de moins de 7000 francs 
qui est presque celui de la carte vidéo 
étendue d’Apple, elle devient un 
produit de base. Cette carte est de plus 
entièrement compatible 32 bits Color 
QuickDraw. Avec ce type de cartes, 
les couleurs explosent au visage, et on 
obtient une qualité photo. 


MacroMind 
Director 


MacroMind Director permet l’uti- 
lisation de plusieurs médias de 
communication, d'expression ou de 
divertissements. Par combinaison de 






































texte, de graphiques, d’animation, de 
sons et de vidéo, ce système par 
l'intégration de plusieurs médias est 
destiné présenter, instruire, visualiser 
ou simuler des concepts et des idées. 


Le package comprend plusieurs 
modules : MacroMind Accelerator 
pour augmenter la vitesse de défile- 
ment d’images (30 images par 
seconde) pour approcher la qualité 
vidéo professionnelle. 


MacroMind Director Interactive basé 
sur une technologie interactive crée 
des visites guidées sur disque ou 
disquette. Ainsi pourrait-on développer 
des simulations ou des prototypes, des 
kiosques à informations, des disques 
de formation, des cours d’éducation 
voire même des logiciels de 
démonstrations. 


MacroMind intègre un puissant 
logiciel de dessin en couleurs, un 
contrôleur de palette de couleurs et de 
l'interface MIDI, une interface 
utilisateur avec des menus pop-up. 
MacroMind utilise un langage de 
scripts se rapprochant beaucoup 
d’HyperTalk appelé “Lingo” qui 
permet de créer plusieurs niveaux 
d’interactivité. Les développeurs 
pourront établir des liens entre 
documents et boutons, animer des 
boutons et les marionnettes, présenter 
l’ensemble sur des supports vidéo- 
disques. 

Distribué par P-Ingénierie. 


Pour les 
Hypercardo- 
maniaques 


Stack Cleaner : c’est un kit d’uti- 
litaires Hypercard comprenant : le 
Script cleaner qui nettoie les scripts, 
réduit la taille des piles en intégrant 
des abréviations standards dans les 
scripts ; le Split Stack qui permet de 
sélectionner des cartes et des fonds 
d’une pile existante pour en créer une 





nouvelle et le Stack Merge qui facilite 
la fusion de deux piles pour en faire 
une. De plus Clone Stack permet de 
dupliquer la pile originale, en en 
effaçant le contenu des champs des 
cartes et des champs de fond. 
L'utilisateur pourra ainsi détruire 
facilement les cartes indésirables. Le 
ResCopy quant à lui copie les 
ressources d’une application ou d’une 
pile à une autre pour une copie rapide 
des menus, des icônes, des sons, et 
autres ressources. Enfin Menu Maker 
crée et modifie les menus pour mieux 
les utiliser dans Hypercard. Des menus 
peuvent être rajoutés dans la barre de 
menu ou comme des menus pop-up 
associés à un champs ou à un bouton. 
Les menus hiérarchiques sont 
possibles. 

Chez Trendware Corp. 


HyperX 


C’est un outil de système expert pour 
créer des applications intelligentes, 
analyser les problèmes ou fournir des 
conseils de base de l’expertise. 
HyperX peut-être combiné avec les 
multimédia pour résoudre les 
problèmes de calculs ou de base de 
données. Interface intelligente de base 
de données pour mieux analyser les 
données, les procédures automatiques 
et les prises de décisions assistées par 
ordinateur. 

Chez Millienum Software. 


ScriptEdit 


Accessoire de bureau intuitif pour 
créer, modifier, imprimer des scripts 
d’HyperTalk. Une fonction de 
comparaison puissante de deux scripts 
afin de voir leur différence ou leur 
similitude. Une XCMD pour installer 
votre pile. ScriptEdit augmente la 
productivité en améliorant l’environ- 
nement d’édition des scripts. 


Chez Somak Software Inc. 


Hyper TMON 


Debuger Interactif du langage de 
programmation HyperTalk. 

Hyper TMON apporte les facilités de 
mise au point avancée pour Hypercard. 


Proposé par Icom Simulations 
Inc. 


Trendware XCAL 


C’est un jeu de XFN et de XCMD qui 
ajoute des possibilités de feuille de 
calcul à Hypercard. Les formules, et 
les macros créées avec XCAL sont 
exécutées automatiquement lors de la 
saisie de nouvelles données dans les 
champs. La version internationale est 
en cours de finalisation. 


Chez Trendware Corporation. 


Les antivirus 


AntiToxin est un programme de 
décontamination et de protection 
contre les virus Scores, nVir A, 
nVir B, Hpat, INIT29 et ANTI. 
AntiToxin est spécialement efficace 
pour les utilisateurs en réseau. Il 
protège le Mac des applications 
infectées du serveur et nettoie le 
serveur. 


Chez Mainstay. 


VirexGuard 


C’est une nouvelle version de Virex 
qui protège les Mac Plus, SE, et la 
famille Mac II contre tous virus 
connus ou non connus : virus Scores, 
ANTI, MEV#, AIDS, Hpat, INIT29, 
Peace, et la famille des nVir. 
VirexGuard est un utilitaire très 
puissant pouvant détecter mêmes les 
nouveaux Virus sur serveur, Sur 
disquette, sur disque dur. VirexGuard 
répare aussi les fichiers infectés. Une 
fois le système désinfecté, VirexGuard 
assure un contrôle permanent du 
système et vous prévient de toutes 
infections. Compatible Multifinder, 
AppleShare, et avec la plupart des 
logiciels sur réseau. 


Chez HJC Software Inc. 


DoubleHelix 


Dans le domaine des bases de données, 
outre toutes celles que je vous ai 
récemment annoncées, à savoir 4D 
nouvelle version, Omnis 5, FoxBase+ 
Mac V.2, on a pu y voir 
DoubleHelix. Cette base de données 
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relationnelles sous Mac/OS et pour 
VMS, que vous connaissez proba- 
blement de nom, revient sur le marché 
français. Quelques caractéristiques 
intéressantes : nombre illimité de 
champs, d’enregistrements, de liens 
entre fichiers, d’icônes, d’index, de 
nombre de fenêtres, de niveaux de 
critères de recherche, de nombre total 
de fichiers dans la base, 128 critères de 
tri, 32500 caractères par champs, 
données comprenant textes, nombre, 
images, date et heure, flags.. Ne fait 
pas le café ! 

Chez Odesta Corp. Sera proba- 
blement distribué par G + M 
Technologies en France. 


Voilà succinctement quelques produits 
qui ne couvrent pas évidement la 
totalité des nouveautés, mais qui 
reflètent les grandes orientations du 
moment. 


WinText 


Un traitement de textes de plus me 
direz-vous. Non, tombé par hasard sur 
la pub de WinText, un traitement de 
textes d’origine française, j’ai voulu 
en savoir plus. Allô Messieurs 
WinSoft, est ce que je pourrais tester 
pour Pom’s votre programme ? Pas de 
problème Monsieur Sebban nous vous 
envoyons cela de suite. Et 
effectivement trois jours plus tard un 
beau paquet m'était remis pas nos 
PTF: 


Un manuel rouge et blanc et deux 
disquettes n’attendaient que mes yeux 
avides. Et je n’ai pas été déçu. Le 
manuel est clair, aéré et complet. Bon 
tout cela ne nous dit pas ce que 
WinText avait en plus. Ce programme 
est tout d’abord résolument tourné 
vers 1992. C’est le seul qui gère les 
césures en quinze langues ! Et quand je 
dis européen, c’est à l’examen 
carrément de mondial qu’il faut 
qualifier WinText. Puisqu’aussi bien 
le programme gère l’écriture de droite 
à gauche, comme l’hébreu ou l’arabe. 
Et l’on peut mixer tous ces types 
d'écriture dans le même fichier dans un 
grand élan d’œcuménisme universel. 


Autre point tout à fait original, est 
son tableur intégré. On peut définir 





des cellules contenant des chiffres au 
milieu de son texte et les relier par des 
formules comme dans un tableur, à 
cette liberté près qu’on est pas 
contraint par un cadre rigide de lignes 
et colonnes. J’ai répertorié 51 
fonctions des plus diverses depuis les 
fonctions manipulant les dates, 
jusqu’à la fonction inédite à ma 
connaissance dans un traitement de 
textes, qui permet de transformer un 
nombre en lettres. 


Une autre originalité tout à fait 
intéressante est l’éditeur de formules 
mathématiques intégré. Ici pas besoin 
de jongler pour écrire une intégrale ou 
une racine carrée. C’est du vrai tel 
écran tel écrit. Pour terminer ce tour 
d’horizon WinText permet de faire du 
mailing de manière très puissante 
grâce à ses fonctions conditionnelles. 


Au chapitre des regrets, l’absence de 
multicolonnage, absence d’une fonc- 
tion de permutation de caractères, qui 
permet de corriger facilement des 
fautes de frappes courantes qui 
consistent en l’inversion de deux 
lettres dans un mot. Absence aussi de 
dictionnaire intégré, et faiblesse de 
l’ouverture dans d’autres formats que 
ce soit en lecture -ou seul MacWrite 
est disponible ou en écriture. Pour 
autant à 2200 francs on peut lui 
mettre quatre belle pommes. 


Stuffit nouveau 


Un shareWare disparaît pour une 
commercialisation classique : le stuffit 
nouveau est sorti : c’est Stuffit 
deLuxe s’il vous plaît. Le petit génie 
qui a écrit le standard des programmes 
de compactage de données à savoir 
Stuffit, vient de signer avec Alladin 
Systems qui va s’occuper dorénavant 
de supporter le produit. Raymond Lau, 
puisqu'il s’agit de lui, venant de 
quitter le lycée pour la fac, n’a plus le 
temps de faire ce travail. Car c’est à 
16 ans que ce jeune homme a écrit la 
première version. Désormais Stuffit 
s’appellera Stuffit deLuxe, et avec 
comme amélioration la possibilité de 
compacter/décompacter en format 
ARC qui est le standard de compres- 
sion dans le monde IBM. De plus le 
programme possède un détecteur 








éradiquateur de virus incorporé. Ce qui 
est sûr c’est que le format de 
compression proprement dit ne 
changera pas, un standard échappant 
souvent à son auteur, les futures 
versions devraient garder la base 
Stuffit. 


Export 


Un produit original a retenu mon 
attention récemment. Il s’agit d’In- 
telligent Developper d'Hyper- 
Press. 

Il s’agit d’un système expert. Avec 
cette particularité d’être ‘interfacé’ avec 
HyperCard. 


Il y a un ou deux ans on ne jurait plus 
que par les systèmes experts. Ils 


devaient révolutionner le monde, et 
permettre à tout un chacun d’accéder à 
La Connaissance. La réalité a été toute 
autre et s’il est vrai que ce type de 


Le papier digital ? 


















Les Ingénieurs de Iomega ont mis 
au pu un 1 prototype de WORM. 


le ta nou . - Lu 
utilise le principe de Bernouilli 
- pour le support. Cette technique 
autorise l'emploi d’un système 
optique très bon marché et un 
laser de très faible puissance pour 
écrire sur une surface plastifiée de 
prix insignifiant. Les premières 
estimations tournent autour de 50 





bien lu). ‘De plus là ‘techniqui 
Bernouilli, permet d'atteindre de 








le marché ce sera la révolution . 
ces prochaines : années. — 
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produits trouvent des applications très 
importantes dans le domaine industriel 
ou médical, Pour ce qui du vulgum 
pecus que je suis, je n’en ai pas vu la 
moindre trace d’une utilisation 
personnelle possible. Interface austère, 
difficulté d’apprentissage, voir prix 
exorbitant tout concourait à faire que 
nous n’en fassions rien. 


Et puis en faisant le marché de ce 
mois ci je suis tombé sur 
Intelligent Developper. C’est un 
ensemble de développement de 
systèmes experts qui peut permettre de 
sortir des applications autonomes, et 
surtout transformer en pile HyperCard 
un système créé avec le noyau. La 
base de connaissance est une base 
classique à programmer en ‘si alors 
sinon’. Intelligent Developper accepte 
de multiples formats d’entrée textes, 
dates, nombres, réponses oui/non etc. 
Et si l’interface n’est pas fabuleuse, 
elle fonctionne. 


Mais là ou le produit prend toute sa 
valeur c’est quand une base est 
terminée, on la transforme en une pile 
HyperCard. Et là c’est de la magie. 
Sous les yeux on voit se monter une 
belle pile avec champs boutons qu’il 
est possible de personnaliser par la 
suite. De base de connaissance 
rébarbative on accède à un produit 
convivial, qu’on peut mettre entre 
toutes les mains. Le débouché de ce 
type de produit devient dès lors évident 
puisqu’outre les secteurs traditionnels, 
il devient accessible aux enseignants 
de lycées, qui pourront y trouver une 
manière attractive de supports 
d’exercices dans toutes les disciplines. 


Et aussi. 


Beaucoup d’autres produits sont 
arrivés en France récemment : Pour ne 
citer que quelques uns, je ne citerais 
que SUM II une nouvelle version de 
SUM testé dans le précédent numéro 
de Pom’s, SUM qui est un kit 
antivirus du même éditeur Symantec. 


J'aurais aimé vous parler plus en 
profondeur des derniers produits Claris 
tel que MacDraw II, MacWrite II, 
ClarisCAD, ainsi que de FileMaker II, 
mais il semble que les services de 
presse de BR Publishing, et 
P-Ingienerie ne daignent pas nous 
prêter ces programmes pOur que nous 
puissions les tester pour vous. Nous 
tâcherons donc de nous les procurer 
directement à la source. Il en est de 
même pour un distributeur parisien 
que je ne nommerais pas mais qui 
représente une quantité suffisamment 
incompétente pour que nous puissions 
nous en passer. 


Je me suis donc adressé à MacSell 
chez qui j’ai reçu un accueil plus que 
chaleureux et efficace pour somme 
toute les mêmes produits. Il y en a qui 
comprennent que parler des produits 
qu’ils importent ne peut que leur faire 
du bien ! Je pense qu’un jour je ferais 
un tableau des importateurs/distri- 
buteurs qui ne prennent pas les 
lecteurs de Pom’s pour quantité 
négligeable, nonobstant la qualité de 
leurs produits qui dans l’ensemble est 
à de très rares exceptions près de très 
haut niveau. 


DAtabase 


Et c’est ainsi que j’ai pu me procurer 
l'utilitaire du mois à savoir : Ce mois- 
ci un gestionnaire de fichiers en 
accessoire de bureau : DAtabase. 


Il est révolu le temps où les 
accessoires de bureaux n'étaient que 
des gadgets. Ils sont devenus de 
véritables applications. L’utilitaire de 
ce mois est assez exceptionnel. Il 
permet de disposer d’un véritable 
gestionnaire de fichier disponible à 
tout instant. Certes sous multifinder il 
est toujours possible d’en avoir un 
ouvert en permanence mais mémoire, 
quand tu n’est pas là... Ce programme 
se divise en trois modules : DAtabase 
Builder est le programme qui fabrique 
la structure, qui sera utilisée par 
l'accessoire de bureau proprement dit. 


Il sera possible de récupérer des 
données en format texte par DAtabase 
Converter. 





Les rubriques manipulables par DA- 
tabase sont de type texte, numériques 
ou même calculées. On peut aussi 
définir des cases à cocher qui se 
comportent en rubriques booléennes. 


Et pour finir la revue, le programme 
accepte des rubriques images de type 
MacPaint ou Pict en couleurs. On 
peut aussi coller une image en fond de 
fiche. 


Les données peuvent êtres extraites 
suivant sept critères sur un seul 
champ. Il est possible de marquer les 
fiches trouvées pour procéder à une 
recherche sur un autre champ parmi 
les fiches marquées. Pour clore cette 
revue trop rapide de ses étonnantes 
possibilités, le programme autorise 
l’export de données sans problèmes. 


Avec pour limite 2500 fiches de 50 
rubriques, DAtabase, est véritablement 
un chef d’œuvre comme on aimerait 
en voir plus souvent. Distribué par 
MacSell, pour un prix d’environ 
800 francs, rapport qualité prix hors 
pair. 


J'ai profité de MacSell pour emprunter 
et tester deux petits produits 
Hypercard, qui améliorent grandement 
les fonctions d’édition papier. Il s’agit 
d’HyperControl de Nordic 
SoftWare, qui permet d’imprimer 
des cartes par sélection soit de données 
soit de statut de boutons comme les 
cases à cocher ou les boutons radio. 


On peut aussi manipuler les champs 
dans un rapport et faire de la 
concaténation de champs à 
l’impression. Le tout pouvant être 
prévisualisé. En outre le programme 
permet de créer des champs calculés 
dans un rapport. Lequel peut être 
éventuellement sauvegardé en format 
texte. 


L'autre produit est HyperBook 
Maker de Ideaform Inc. qui 
autorise l’impression des cartes d’une 
pile sous une forme prête à relier. On 
peut ainsi tirer d’une pile un véritable 
livre qu’il n’y plus qu’à agrafer, le 
programme se. chargeant des 
rectos/versos et de la numérotation, Le 
programme gère aussi bien une 
ImageWriter, qu’une Laser. 
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Les plus 
de ce mois 


Trois inits, 
un accessoire 
de bureau 


Tout d’abord le feuilleton 
Boomerang continue. Ce fabuleux 
utilitaire sous forme de CEDV apporte 
avec cette nouvelle version la mise des 
paramètres sous forme d’un fichier 
externe. Utile quand on passe à une 
version supérieure pour ne pas avoir à 
ressaisir toutes les listes. Pour ce qui 
est du fonctionnement de ce 
programme voir les numéros 
précédents de Pom’s. 


Avec toutes ces Inits que je vous 
propose tous les mois, il peut vous 
paraître utile de disposer d’un 
programme qui permet de les gérer. 
C’est chose faite avec InitManager, 
qui permet d’activer/désactiver une Init 
au démarrage et de mettre ces utilitaire 
dans un dossier propre. Compatible 
tous Mac. 


Autre CEDV, un économiseur d’écran. 
Mbôire permet d’éteindre l’écran de 
votre Mac si vous n’y travaillez pas 
sans perdre son contenu évidemment. 
Interface très agréable, et fonction- 
nalités importantes. 


Et enfin Clipboard Magician. Ce 
DA est un éditeur extrêmement 
puissant de presse-papiers. On peut 
avec copier dans un format, coller dans 
un autre, en ayant même modifié des 
données au passage. Étonnant. 


Et pour finir, je vais vous livrer un 
secret : une des sources qui me permet 
de répondre à toute question sur tout 
ce qui se fait sur Mac aux États-Unis, 
c’est The Macintosh Buyer 
Guide. Cette revue trimestrielle 
compile toutes les adresses, téléphone, 
fax, des éditeurs américains, avec un 
classement par produit. Quasiment 
indispensable pour acheter aux USA. 
Ce qui souvent permet de faire de 
substantielles économies. J’en profite 
pour vous le rappeler, acheter par 
correspondance là-bas est d’une 
simplicité enfantine. Avec une carte 
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Visa, en donnant le numéro et la date 
de fin de validité, par téléphone, fax 
ou par lettre simple, une semaine 
parfois moins, suffit pour voir arriver 
le colis convoité. Avec au bout du 
compte 30 à 50% d’économies. Cette 
revue est diffusée en France par 
l’A.IC. 


Adresses 


Advance Gravis 

6894 Palm Avenue Burnaby B.C 
Canada V5J 4M3 
MicroTouch Systems Inc 
55 Jonspin Road 

Wilmington, MA 01887, USA 
TPS Electronics 

4047 Transport Paolo Alto 
CA 94303, USA 

RasterOps 

2500 Walsh Road, Santa Clara 
California 95051, USA 
P-Ingénierie 

10 rue Mercœur, 75011 Paris 
Trendware Corp 

PO Box 2285 Huntington 

CT 06484, USA 

Millienum Software 

1970 S. Coast HWY, 

Laguna Beach, CA 92651, USA 
Somak Software Inc 

535 Encinitas Bild, Suite 113 
Encinitas, CA 92024, USA 
Icom Simulations Inc 
648 S. Wheeling Road, Wheeling 
IL 60090, USA 

HJC Software.Inc 

PO Box 51816 Durham 

NC 27717, USA 

Odesta Corp 

4084 Commercial Avenue 
Northbrook, IL 60062, USA 
A:1C: 

54 rue Lamartine, 75009 Paris 
æ (1) 42 81 21 93 
Mainstay 

71 rue des Atrébates 

1040 Bruxelles, Belgique 
MacSELL 

193 rue Jean Lolive 

93500 Pantin 

æ (1) 48 43 60 33 
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Vous avez dit 
forets ? 


La pince à tiercé vous vous 
souvenez ? Avec les disquettes de 
l’AppleIl les petits malins se sont 
vite aperçus qu'il suffisait de 
trouer le bord de la disquette de 
manière symétrique au trou 
d'écriture, pour pouvoir écrire 
sur la deuxième face. 


De 143Ko on passait ainsi à 286Ko 
pour le même prix même si ce 
n'était pas en continu. Le temps 
du bidouillage est révolu et les 
disquettes de 800Ko du Mac 
peuvent être formatées en 1,44 
Méga dans les nouveaux lecteurs 


Il faut percer avec une perceuse et 
un petit foret, un trou symétrique 
au premier trou de verrouillage 
des disquettes. Les perceuses 
pour maquettes sont idéales, Une 
disquette ainsi manipulée, 
insérée dans un lecteur 1,44 Méga 
se voit d'office formatée dans 
cette capacité. Le processus ayant 
un système de vérification du 
formatage, la disquette est éjectée 
sans pitié si le formatage ne 
réussit pas. Auquel cas un petit 
scotch sur le nouveau trou la fait 
repasser en 800Ko. 80% des 
disquettes double face peuvent 
sans problème passer l'épreuve. 
Vous pouvez toujours essayer 
d'en faire autant avec vos 
dont personne ne doute vous les 
avez quasiment toutes 
réussite est plus réduit mais ça 
marche aussi. 








À vos forets. 
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Jean-Yves Bourdin 


Nouvelles du front 


Les programmeurs 
s’organisent 


L’événement le plus intéressant pour 
l’Apple //, c’est sans doute la 
conférence des développeurs Apple // 
qui s’est tenue à Kansas City, à 
l'initiative d’A2 Central, mais avec 
une forte participation d’ Apple. 

Si je dis à l’initiative d’ A2 Central, et 
pas de l’APDA Apple, c’est que les 
développeurs Apple // ont senti le 
besoin de s’organiser indépendamment 
d’Apple, à cause de la politique de 
marketing aberrante de celui-ci 
concernant l’ Apple // (voir ci-dessous 
“Vendre des GS”). 


Vous trouverez nombre d’informations 
venant de cette conférence dans ces 
lignes, mais pour avoir plus de détails 
sur les discussions de cette conférence, 
il en existe un enregistrement sur 
cassettes audio à commander à A2 
Central. 


Beagle y a dévoilé comment écrire vos 
propres TimeOut, mais a fait 
promettre à chacun de ne rien révéler. 
Apparemment, nul ne savait à Kansas 
City que des sources d’applications 
TimeOut étaient déjà publiés, à 
plusieurs reprises, dans nos 
colonnes... Qui peut croire 
sérieusement qu’on peut enseigner à 
utiliser Sourceror sur AppleWorks et 
éviter qu’on l’utilise sur TimeOut? 


Un des actes essentiels de cette 
conférence a été la constitution d’une 
Association permanente des 
développeurs sur Apple //, totalement 
indépendante de l’ APDA et d’Apple. 
Sa première réunion officielle se 
tiendra à l’Expo Apple // de septembre 
à San Francisco. 


Son bureau provisoire indique assez 
quelle sera son orientation : Barney 
Stone (DB Master), Roger Wagner 
(HyperStudio et tous les autres), Mark 
Simonsen de Beagle, Ron Lewin 
(Micol Basic), Bill Mensch 
(concepteur du 65816), et Tom 
Weishaar d’ A2 Central. Développeurs 
Apple //, je ne peux que vous inciter 
très fortement à y adhérer. 


Parallèlement, et toujours 
indépendamment d’Apple (et de 
Claris), s’est formée une Association 
des Programmeurs en. AppleWorks ! 
La combinaison AppleWorks 3.0/ 
UltraMacros 3.0 permet à Apple- 
Works de devenir un vrai langage, aux 
développements illimités. Ne serait-ce 
que pour rendre compatibles entre elles 
toutes les applications qui se greffent 
sur AppleWorks et/ou travaillent les 
fichiers AppleWorks, une telle 
association était bien une nécessité. 


Le nouveau GS 


À ceux qui croyaient que je diffusais 
des rumeurs incontrôlées, Apple USA 
a répondu le 15 août dernier : il y a 
bel et bien un nouveau GS. À partir du 
15 août, les GS vendus aux USA ont 
une carte d’extension mémoire d’un 
Méga (comme en France) et une 
nouvelle carte-mère. Ils sont livrés 
avec le nouveau système 5.0. 

La nouvelle carte-mère inclut plus 
d'outils en ROM (256K0o au lieu de 
128Ko de ROMSs), diverses 
améliorations dans la gestion du 
clavier, des améliorations pour le 
graphisme et le son, etc. 

Finalement, le plus intéressant dans 
tout ça, c’est que des possibilités 
supplémentaires existent pour 
conserver les capacités des “slots 
internes” du GS, tout en ayant 
configuré le tableau de bord sur ma 
carte. Cela est possible sur l’ancien 
GS pour les slots 3 et 4 (techni- 
quement : le signal Device Select est 





toujours présent), mais cela est étendu 
à d’autres slots dans le nouveau. C’est 
fort précieux : cela revient en fait à 
dire que nous avons plus de slots. 


Apple USA a annoncé qu’il n’y aurait 
pas de programme de mise à niveau : 
les possibilités nouvelles apportées 
par ce GS sont minimes, comparées à 
ce qu’une mise à niveau coûterait. 
Effectivement, dans la mesure où le 
Méga de RAM supplémentaire n’a 
finalement pas été mis sur la 
carte-mère elle-même, sachant que le 
système 5.0 tourne aussi sur les 
anciens GS, et inclut en soft 90% des 
améliorations du nouveau GS, la mise 
à niveau ne s’impose pas. 


Nouvelles 
d’Apple France 


Trop de nouvelles des Ulis dans ce 
numéro. Je les résumerai donc en un 
seul conseil : allez à l’Expo ! Vous y 
trouverez un stand bien visible de 
l’Apple // Service Team, avec plein de 
nouvelles : une nouvelle édition du 
Guide de l’ Apple //, qui a doublé de 
volume (de 80 à 160 pages). Je ne 
vous détaille pas son contenu, vu son 
prix. 


Une démonstration des possibilités de 
la combinaison système 5.0/GS/Mac, 
et des échanges entre Mac et Apple // 
vous attendra au stand Apple //. Un 
GSForth, réalisé par Alexandre 
Ferret (d'Apple France), vous 
montrera les possibilités du 5.0. Et un 
jour, ce Forth vous sera vendu... au 
même prix que le Guide de l’ Apple // 
(gratuit !). Seront aussi en 
démonstration AppleWorks GS et 
HyperStudio. Un spécialiste du hard 
Apple // répondra à vos questions. Et 


j'en passe. 
À propos de la version française 


du 5.0 : c’est pour bientôt, c’est en 
cours. Je vous ai déjà conseillé, je 
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crois, de le réserver à l’avance chez 
votre concessionnaire... 


En ce qui concerne le nouveau Gs : 
l'essentiel est dans le fait qu’ Apple 
France a pris la décision claire de 
vendre, dès qu’il le pourra, ce nou- 
veau GS. La francisation demande du 
temps. Aucune date n’est fixée, mais 
les plannings pointeraient plutôt vers 
le mois de janvier. 


Pour ceux qui voudraient mettre à jour 
leur GS, n’essayez pas de fracasser 
votre carte-mère comme je l’avais 
suggéré : on vous en mettrait une 
ancienne (en bon état, mais ancienne), 
à la place! Et si quelques fanas 
souhaitaient tout de même mettre à 
jour leur GS, qu'ils se posent la 
question : êtes-vous vraiment prêts à 
payer plusieurs milliers de francs pour 
ça? 


Dernière bonne nouvelle d’Apple : il y 
a désormais (enfin !) un VS-Com 
1.14 qui tourne sous GS/OS. La 
mise à jour est gratuite : il suffit 
d'envoyer sa disquette originale à 
Apple France. 


Vendre des GS 


C'était la complainte à la conférence 
des développeurs de Kansas City (voir 
A2 Central de septembre), c’est la 
complainte au GS Club 94, c’est la 
complainte des revues US (voir 
Nibble, Sourceror Apprentice, etc.). 
C’est en fait le dernier reproche 
sérieux que nous ayons à faire à 
Apple, aux USA comme en France : 
Apple ne sait pas vendre ses GS. 


Les promesses de Sculley l’an dernier 
étaient vraies : Apple, au plan 
technique, a “mis le paquet” sur le GS. 
Désormais, avec le système 5.0 et la 
nouvelle carte-mère, les problèmes 
techniques sont réglés pour l’essentiel. 
Ce qu’Apple a fait au plan technique 
pour le GS est très bon, et nous tirons 
tous, sincèrement, notre chapeau. 
Cela n’a pas toujours été vrai, mais 
maintenant ça l’est : le GS est 
désormais une machine parfaitement 
fonctionnelle, avec un excellent 
système. En France, le support est 
désormais clairement assuré aux Ulis 
par l’équipe Apple //. Ne reste plus 
qu’une chose, en somme : en vendre. 
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Suite de la page 47 


break; 
case 1: 


{ 
DrawString{"\pMajuscule "); 


DrawChar(“"}; 


DrawCharal *6)+5+jl}; 
DrawChar(“}; 


} 
} 
} 
break; 
case 3: 


{ 
DrawString("\pOption - Majuscule "); 


DrawChar("); 
DrawChar(st{(i* 6) + 3+j]); 
DrawChar(“}; 
DrawString("\p, puis "); 
switch (st{(i" 6) + 4 + j]) 

{ 


case 0: 


{ 
DrawChar(“"); 


DrawChar(st{(i * 6) + 5 + j}); 


DrawChar(*"}; 
} 
break, 


case 1: 


{ 
DrawString{"\pMajuscule "); 


DrawChar(""}; 
DrawChar(st{(i * 6) + 5 + j)); 
DrawChar(“'); 


case Repetition: 
{ 
switch (st{(i* 6) +2 + j]) 


case 0: 
{ 
DrawChar(“"); 
DrawChar(st[(i * 6) + 3 + j]); 
DrawChar(“"'}; 
DrawString{"\p deux fois"); 
} 
break 
case 1: 
{ 
DrawString("\pMajuscule "}; 
DrawChar(“); 
DrawChar(st{(i * 6) + 3 +j]}; 
DrawChar(*}; 
DrawString("\p deux fois"); 
} 
break 


case 2: 


{ 

DrawString("\pOption "); 

DrawChar(""}; 

DrawChar(st{(i* 6) + 3 + j]); 

DrawChar(”}; 

DrawString("\p deux fois"); 
} 


case 3: 


{ 


DrawString("\pOption - Majuscule "); 


DrawChar(*"); 
DrawChar(st{(i * 6) + 3 + j]}; 
DrawChar(*"}; 
DrawString("\p deux fois"); 


break; 


} 
#q == 0) &ée (st{(i* 6) + 6] == v)) 


j=6; 
DrawString{"\p. Ou "); 
goto Boucle; 

} 


} 
SetPort(savePort) 
} 


/eerenemananenananeneencaneenenneensasenenensen | 


PoliceComplete() 


GrafPtr savePort; 
static  Rect textV =1{9,9,240, 232}, 


text ={12,12,237,229}; 





GetPort(&savePort); 
SetPort(pFenetre); 

SpecialeOfK); 

TextFont(nPolice); 
TextSize{tPolice); 

hTexte = TENew(&text, &textV}; 
TEAutoView( Oui, hTexte }; 


TElnsert( &lc{0], 253, hTexte); 
TESetSelect(1, 1, hTexte); 
Vue); 

Selection); 
TEActivate(hTexte); 
AfficheCode(Speciale); 


SetPort(savePort); 
} 


eteteneenanaennannenentententenneneaneentennennse / 


Commande(c) 
charc; 


switch (c) 


case "x" Couper(); break 
case é Copier(); break 


case ‘v': Coller(); break 
default : SysBeep(10); return; 
} 
} 


Jrantennesseneeneenennenennnennenententetenenes / 


ss 


GrafPtr savePort; 
Rect 5 


GetPort(&savePort); 

SetPort(pFenetre); 

if (Speciale) 
{ 
SetRect(&r, 313, 0, 384, 0); 
rtop = -7 + (16 * Speciale); 
r.bottom = rtop + 15; 
InvertRect(&r); 
Speciale = Non; 
AfficheCode(Speciale); 

} 

SetPort(savePort); 

} 


'eatesmeannannenenenennennenmennennnnennennennn / 


passé 
GrafPtr savePort; 
Rect r 


GetPort(&savePort); 

SetPort(pFenetre); 

if cr cm 
SetRect(&r, 313, 0, 384, 0); 
rtop = -7 + (16 * Speciale); 
r.bottom = rtop + 15; 
InvertRect(éer); 

} 

SetPort(savePort); 

} 

/venennnaneusannennenaansanneenennenaannannannee / 

SelSpeciale(p) 

Point p; 

{ 

GrafPtr savePort; 

Rect s 

int ÿ 


GetPort(&savePort); 
SetPort(pFenetre); 
SetRect(&r, 313, 0, 384, 0); 
for(i=1;i<11;i++#) 


{ 
rtop =-7+(16*i); 
r.bottom = rtop + 15; 


if Es &r)) 


} 

if (Speciale) AfficheCode(Speciale); 
SetPort(savePort); 

} 


Jrenermeennaneennanneneenemnmenennennenmnentaannee | 





























Aux USA, en gros, Apple se contente 
de vendre des GS à ceux qui en 
demandent. En France, il se contente 
d’assurer le suivi pour ceux qui en ont 
un. Mais la première chose qu’apprend 
un débutant en marketing, c’est qu’il 
faut vendre ses produits, et pas 
seulement attendre qu’on vienne les 
acheter. 


À 10 000 F HT prix public, vous 
avez un ordinateur Graphique Son, une 
machine d’aujourd’hui, 16 bits, avec 
l'interface utilisateur d’aujourd’hui, 
extensible avec ses 7 slots, dotée de 
1,2 Méga de mémoire en standard, un 
moniteur couleur RVB excellent. Sans 
compter la compatibilité Apple //, et 
la montagne d’excellents logiciels GS. 


Qu’Apple ait, dans un premier temps, 
cherché à vendre le GS d’abord aux 
propriétaires d’Apple // 8 bits, rien 
que de plus normal. Mais aujourd’hui, 
le GS couleur 1,2 Méga coûte moins 
cher que ce que j’ai payé mon IT Plus 
d’occasion. Ce n’est plus un simple 
upgrade de l’ Apple //. Il est temps de 
le vendre à tout le monde. 

Ne serait-il pas temps que les 
publicités d'Apple, et pas seulement 
les sourires des professeurs compé- 
tents, fassent comprendre à ce 
Proviseur de Lycée si fier d’avoir pu 
acquérir, sur les fonds propres de son 
établissement, de nouveaux compa- 
tibles PC «dont trois compatibles 
AT», qu’il aurait pu avoir pour le 
même prix de vrais ordinateurs pour 
les grands ? 

Ne serait-il pas temps que ses élèves 
travaillent sur des machines meilleures 
que celles qu’ils ont chez eux, avec au 
moins autant de couleurs, de 
graphisme et de son ? Je crois 
cependant qu’ Apple commence à se 
rendre compte lui-même de tout cela : 
c’est dans le bulletin de l’APDA 
Apple qu’on peut lire, sous la plume 
de Mike Westerfield (Byte Works), que 
«le marché de l’Apple IIGS est 
semblable au marché du Macintosh à 
ses débuts, quand le Macintosh avait 
deux ans d’âge». 


Au bout de deux ans, le Mac avait 
réglé ses problèmes de jeunesse, était 
prêt à s’imposer à cause de ses qualités 
internes et de ses possibilités 
d'évolution. Seuls Apple et une élite 
d'utilisateurs le savaient et le disaient 
alors. Ceux qui n’ont pas pris ce train 
l’ont regretté ensuite : ceux qui ne 
montent pas aujourd’hui dans le train 
du GS le regretteront ensuite. 


Chez nous, la présence de l’ Apple // à 
l'Expo sera visible. Et j’ai appris que 
je m'étais un peu trompé à propos du 
Sicob : Bréjoux y était bien, mais 
Apple aussi. En fait, Apple hébergeait 
Bréjoux : signe qu’Apple France veut 
effectivement promouvoir le GS, mais 
sait sur qui s’appuyer pour cela. En 
somme, tous ceux qui soutiennent 
l’Apple // travaillent de plus en plus 
ensemble. 

Si les consommateurs sont 
intelligents et qu’Apple fait son 
travail, on peut s’attendre à un 
“boum” sur le GS (le nouveau, avec 
256Ko de ROM et le 5.0) en 
janvier … 


Vent d’Est 


À la conférence des développeurs de 
Kansas City, une participation 
remarquée : deux développeurs 
soviétiques (V. Fedorov et A. 
Surougine) d’un Institut de Moscou. 
L'URSS a passé un contrat pour 
importer pour ses écoles 100 000 
ordinateurs compatibles //e de 
Bulgarie, où on les fabrique sous le 
nom de Pravetz. 

L'Institut recherche des producteurs de 
logiciels qui seraient intéressés par le 
marché soviétique. Il a également à 
vendre une excellente réalisation, un 
analyseur spectral, instrument de 
mesure scientifique qu’on ne trouve 
jusqu'ici que sur des configurations 
beaucoup plus chères. 

«Apple // for ever, camarades !» 


AE grossit 


Il est en train de se passer pour 
Applied Engineering ce qui s’est déjà 
passé pour Beagle, et auparavant 
pour. Apple lui-même. L’entreprise 
devient si grosse qu’elle ne peut plus 
être dirigée par son “père fondateur”, 









du moins si celui-ci préfère la 
conception des produits à la gestion 
d’une entreprise. PDG, c’est un métier 
comme un autre, après tout. 

Dan Pote laisse donc son poste de 
PDG à un nouveau venu recruté à 
l’extérieur, R. J. Carroll, pour diriger 
pour sa part le service Recherche et 
Développement d’AE. Qu’AE 
s’organise, c'était devenu inévitable. 
Mais l’expérience nous enseigne que 
le départ de Wozniak n’a pas signifié 
que de bonnes choses pour Apple : 
espérons que l’entreprise AE saura 
rester aussi Apple // For Ever 
qu'auparavant. C’est ce qu’elle dit, et 
je la crois. 


Laser 


Il y a du monde sur le marché de 
l’Apple // : en-dehors d’AE, dont tout 
le monde sait qu’il pourrait dès 
demain, si Apple ne faisait plus son 
travail, sortir des machines meilleures 
que celles d’Apple, Laser 
Technology (qui appelle à juste titre 
le //c Plus un clône Laser) a déjà dans 
ses cartons le prototype d’un vrai 
portable 8 bits, et un compatible GS. 
Le problème qui reste à régler est celui 
des ROM : l’AppleSoft de Microsoft 
coûtant cher, c’est Micol qui prépare 
un Basic pour les ROMSs du futur 
Laser. Et si vous savez écrire des 
outils pour le GS qui fassent le même 
travail que ceux d’Apple sans les 
copier (c’est du travail, mais c’est 
possible), votre avenir est assuré 
auprès de Laser Technology. 


Toujours Plus 


Audio Animator : 
pourquoi je n’ai pas de 
Sonic Blaster 


La carte stéréo/numérisation des sons 
Sonic Blaster, d'AE, est 
excellente, et il n’y a rien à dire contre 
elle (à part cet inconvénient mineur de 
la protection du logiciel, qui refuse de 
sauver les fichiers sur un GS sans la 
carte). Je n’ai qu’une raison pour ne 
pas avoir mis de Sonic Blaster dans 
mon GS : j'attends mieux. 
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Car je connais le nom de ce mieux : la 
carte Audio Animator, toujours 
d’Applied Engineering. Audio 
Animator, c’est la Sonic Blaster, plus 
une interface MIDI complète 
compatible Passport (qui laisse libre 
le port série du GS), plus un logiciel 
séquenceur complet, plus une 
mini-table de mixage externe. 


Au moment où j'écris ces lignes, les 
publicités américaines nous 
conseillent de passer commande tout 
de suite : il semble cependant que cette 
carte ne soit pas encore immé- 
diatement disponible (le logiciel a pris 
du retard, paraît-il). Tant pis, 
j'attendrai un peu, quitte à me 
contenter du hard d'HyperStudio. 


Octophonie 


J'ai une bonne raison pour être 
patient : j’ai un Apple IIGS. 

Parce qu’enfin il faut dire les choses 
nettement : loin de me plaindre, 
comme certains, qu’Apple n’ait pas 
mis de sortie stéréo au GS, je l’en 
félicite. C’est la même chose qu'avec 
la sortie Pal pour la vidéo : on peut le 
faire, sans gros problème, et à un coût 
négligeable. Qui peut le plus peut le 
moins. 


Mais le Pal des téléviseurs, à côté du 
moniteur RVB Apple, c’est de la 
gnognotte, comme dit Zazie (et que 
dirait-elle à propos du NTSC...). Eh 
bien, la stéréo, pour l’Ensoniq du GS, 
c’est pratiquement la même chose. 


Ne vous récriez pas : j’ai entendu le 
GS et la Sonic Blaster sur une bonne 
chaîne, et c’est magnifique. Mais je le 
maintiens la stéréo est une 
mutilation des possibilités du GS. 

Le son du GS sort sur 8 canaux, oui, 
huit, pas deux. Le GS joue et 
enregistre en octophonie : ai-je déjà dit 
que c’était une magnifique machine? 
Et ces huit canaux, je veux pouvoir 
m’en servir. 

On peut toujours, avec un 
démultiplexeur, affecter les canaux 
pairs à gauche et les impairs à droite, 
comme font les cartes stéréo : on 
divise par 4 au lieu de 8. Mais on 
divise. Apple ne fait pas cette 
chirurgie, il laisse l’utilisateur libre de 
brider lui-même son GS. 





Un GS avec Audio Animator, c’est 8 
pistes et 16 canaux, Ensoniq et Midi, 
la qualité Apple et la qualité Applied. 
L’Audio Animator est la dernière pièce 
qui manque à mon puzzle : mais c’est 
pour bientôt. 


Vulcain 


Reçu de Bréjoux la documentation de 
Vulcain, le nouveau disque dur 
d’AE. C’est manifestement un choix 
de Bréjoux : ce qui doit être en français 
(la documentation utilisateur) est 
traduit, ce qui doit rester en anglais 
(les appendices techniques pour 
bidouilleurs) reste en anglais, mais est 
toujours inclus (alors que les 
américains n’ont pas toujours droit à 
cette partie). 


Vu, sur cette documentation, des 
choses très malines en matière 
logicielle : un CDA qui permet de 
reconfigurer à la volée le Vulcain pour 
choisir la partition de boot, d’interdire 
l’écriture sur une partition, de ranger 
les têtes. Pas bête, ça, surtout quand 
on peut avoir jusqu’à 16 partitions sur 
le même disque ! 

Même chose avec le Driver GS/OS 
inclus : l’effet est le même qu'avec les 
drivers Apple. Les ROMSs de la carte, 
étant dans un slot, sont ralenties à 1 
Mhz. Il suffit de remplacer ces ROMs 
par un driver en RAM, et tout est 
accéléré (y compris à la vitesse 
Transwarp si vous en avez une). 


Un P8 patché est fourni : il permet de 
faire reconnaître à ProDOS 8 jusqu’à 4 
partitions sur le même disque (si vous 
avez plus de 64Ko). 


Avouons-le, j’ai vu aussi quelques 
faiblesses ne fournir que le 
préhistorique Backup // d’Apple pour 
faire les backups du disque dur, ce 
n’est pas très sérieux de la part d’AE. 
D'autant que Back-up // ne marche pas 
avec les fichiers étendus du système 
5.0, lequel est aux USA le système 
officiel du GS. 

De toute façon, je conçois mal qu’AE 
ne fournisse pas un utilitaire capable 
de faire un backup physique de 
l’ensemble des partitions du disque 
dur : il faut faire des backups par 
fichiers de l’ensemble des systèmes 
présents sur le dur. Un backup en 





CP/M, un autre en Dos, un autre en 
Pascal, un autre en ProDOS : la 
galère. 

En fait, la solution est toute simple: 
cesser de galérer avec ces systèmes 
d’exploitation parfaitement obsolètes, 
tout mettre sous 5.0 et ProDOS, et 
utiliser ProSel-16. 


Bréjoux reconnaît que la combinaison 
Vulcain/Transwarp/Système 5.0 rend 
pratiquement inutile la Ramkeeper : 
les temps de chargement des 
applications sous GS/OS étant 
comparables à celles du disque RAM, 
et la Ramkeeper étant tout compte fait 
assez encombrante avec sa batterie et 
ses trois cartes dans un seul slot, le 
disque dur suffit. 

C’est d’ailleurs ce qui explique cette 
option bizarre de la carte Vulcain : on 
peut faire reconnaître la carte qu’on a 
mise dans le slot 2 ou 5, par exemple, 
comme si elle était dans le slot 7 
(mais seulement le 7). Parbleu, mais, 
puisque de toute façon cela va rendre 
inutilisable pour autre chose le slot 7, 
pourquoi ne pas mettre effectivement 
la carte dans ce slot ? Je ne vois 
qu’une réponse possible : certains 
bourrages de cartes AE du côté du slot 
d’extension mémoire doivent bloquer 
le slot 7. C’est une bonne chose que 
le Vulcain les rende inutiles. 


Entre le SCSI de ToolBox et le 
Vulcain de Bréjoux, le prix du Mo est 
en forte baisse sur Apple //. Que 
diriez-vous d’une revue dans Pom'’s de 
ces disques durs ? 

En tout cas, le disque dur devient 
maintenant un équipement standard des 
GS, comme des autres machines 
sérieuses. Si vous trouvez que c’est 
encore un peu cher, songez donc à 
revendre votre second lecteur 3,5. 


RAM-disque dur 


Si vous voulez vraiment un disque 
dur qui soit aussi rapide que la RAM, 
eh bien prenez un disque dur... RAM ! 
C’est ce qu'a réalisé Cirtech : un 
disque SCSI en RAM sauvegardée (qui 
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même 


informations 
ordinateur éteint). Une sorte de grosse 
carte Speedisk, mais présentée comme 
un engin SCSI. SCSI, cela veut dire 
chaînable sur la carte SCSI, et 
compatible Mac et Apple //. 


garde les 


Outre la vitesse, c’est un moyen pour 
dépasser la barrière des 8 Mégas sur 
GS et 4 Mégas sur Mac Plus : plus 
aucune portion de la mémoire 
adressable n’est bloquée par un 
RAM-disque, tout est disponible pour 
les applications. 

En outre beaucoup de ces applications, 
sur Apple // comme sur Mac, utilisent 
justement le dur comme mémoire 
virtuelle. Quand ce dur est lui-même 
fait de RAM, autant dire qu’on 
augmente la RAM de la machine. 


Fastmaths, suite 


Reçu également de Bréjoux la 
documentation de la carte Fastmaths 
d’AE. N'’étant pas un technicien de la 
chose, je ne peux qu’apporter quelques 
précisions. La carte sert à la fois 
d’accélérateur pour les opérations 
mathématiques et apporte de la 
précision en plus (64 bits). On peut 
utiliser la carte dans un slot du GS, 
même non déclarée dans le tableau de 
bord, à condition de ne pas utiliser la 
ROM de la carte, mais le logiciel 
fourni sur disque. 


Ce logiciel consiste en un gros ajout à 
Basic.System, et en des sources 
Merlin/APW. Cela confirme l’orien- 
tation programmeurs, et non utilisa- 
teurs de la carte : les softs fournis ont 
pour auteur Bob Sander-Cederlof (mais 
pourquoi AE ne le dit-il pas ?), ce qui 
est un gage de qualité. 

Mais il y manque un outil SANE 
pour remplacer celui de GS/OS, et des 
patches au tableur d’AppleWorks. Si 
vous calculez beaucoup, ou que vous 
faites beaucoup de graphisme, et que 
vous savez programmer, la Fastmath 
est pour vous. Mais si vous voulez 
seulement accélérer le GS, c’est la 
TransWarp GS qu’il vous faut. 


Le mange-disques 


AppleWorks 3.0 
en France 


C’est une lettre parfaitement officielle, 
du service Relations Consommateurs 
de Claris USA, datée du 2 août : 
AppleWorks 3.0 (version US) est 
disponible en France, à un tarif 
d’upgrade, chez Claris-France/ 
P.Ingénierie. Aux USA, l’upgrade 
coûte 80 dollars et est valable pour 
n'importe quelle version d’Apple- 
Works. Bon, l’expérience de Claris 
France vous a rendu sceptique : moi 
aussi, puisque j’ai préféré envoyer 
mon AppleWorks et 80 dollars à un de 
mes agents en Californie, qui l’a 
acheté là-bas pour moi. Mais cette 
lettre est claire : fournir un upgrade 
d’Apple- Works 3.0 est une obligation 
contrac- tuelle de P. Ingénierie, dans la 
mesure où il a accepté de s’appeler 
Claris France. Je ne peux donc 
qu'’inciter les impatients, ceux qui ne 
peuvent pas attendre le résultat des 
tractations secrètes en COUrS pOur une 
version française de la 3.0, à s’adresser 
à Claris. 


Beagle contre Beagle ? 


C’est un peu pour rire que je parlais 
du “trust Beagle” dans Pom’s 43. Et 
pourtant il commence à se produire 
pour notre bon vieux chien ce qui se 
passe souvent dans les grosses 
machines : il se concurrence lui- 
même. Déjà que TimeOut 
Edifonts, écrit par qui vous savez et 
diffusé par qui vous savez, 
concurrençait le Beagle Font 
Editor (et le surpasse, à mon avis du 
moins, bravo Daniel Lurot), voici que 
Beagle a en même temps à son 
catalogue l’excellent Point to 
Point de Gary Little (récupéré chez 
Pinpoint), et un autre logiciel de 
communications, TimeOut Tele- 
Comm, qui fait en gros la même 
chose, mais sous TimeOut. 
TimeOut ReportWriter français, 
en revanche, c’est pour bientôt : on en 
est à la phase de débugage (des bugs 
américains d’ailleurs, il n’y a jamais 
de bugs français dans les TimeOut). 
Rendez-vous au prochain Pom's. 





L’autre inusable 


À quoi peut bien servir, de nos jours, 
un Apple // 8 bits ? En-dehors 
d’applications particulières (serveurs 
dédiés, instruments de mesure, 
logiciels éducatifs, etc.), la réponse 
globale tient en deux noms : 

1° AppleWorks (avec TimeOut) ; 

2 Print Shop. 

Broderbund ne se satisfait pas, 
semble-t-il, du million et demi 
d'exemplaires de Print Shop qu'il a 
vendus, et en sort une nouvelle 
version. Nouvelle interface utilisateur, 
meilleure résolution des graphismes, 
possibilité de voir sur écran le résultat 
de son travail avant l’impression, de 
placer les dessins et textes où on veut 
sur la page, de mettre plusieurs 
dessins et plusieurs polices, bref, tout 
ce qui manquait au Print Shop 8 bits 
y est désormais inclus. 

En prime, les calendriers qu’imprimait 
Print Shop Companion seront 
désormais réalisés directement par 
Print Shop. Le compagnon est 
lui-même renouvelé : en plus de 
l’éditeur de polices et de bordures, il 
inclut désormais un éditeur 
d’enveloppes, et des modèles complets 
pour réaliser, par exemple, toute une 
“Newsletter” sur son Apple // 8 bits : 
Print Shop, c’est bel et bien de la 
PAO. 

Il n’y a toujours qu’une chose qui 
m'irrite, cette satanée protection 
contre la copie, qui donne une prime 
aux pirates, qui ont une version 
normale, déprotégée, et pénalise les 
utilisateurs honnêtes (payants). Il 
faudra qu’on m’explique un jour. 


AppleSoft toujours 
vert 


Il est toujours là, bien vivant, on ne 
s’en lasse pas. Ce bon vieil 
AppleSoft, pour tourner impec- 
cablement, a besoin de trois 
compléments : 
1° Program Writer, d’Alan Bird, 
diffusé par Beagle (et 
Bréjoux/ToolBox en France). Voir les 
Pom’s précédents. 
2 ProCommand, de G. Bredon, 
diffusé en France par Pom’s/ 
Éditions MEV. Voir dans ce numéro. 
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æ La série des ToolBox, de Roger 

Wagner (si nos amis de ToolBox 
ne diffusent pas les ToolBox, qui le 
fera ?). Cette série des ToolBox est 
composée de commandes passant par 
l’& de l’AppleSoft, et sont écrites de 
façon relogeable : elles sont “collées” 
de façon invisible dans l’espace du 
programme Basic lui-même, et se 
déplacent avec lui de façon 
transparente. 


Cela leur permet d’être toutes 
compatibles entre elles, de se loger 
commodément dans la mémoire. Cela 
leur permet aussi d’être compatibles 
avec les commandes de ProCommand. 
Avec la série des ToolBox (Video 
ToolBox, Chart and Graph ToolBox, 
Wizard’s ToolBox), on peut 
pratiquement tout faire, les menus à la 
AppleWorks, un curseur-souris, des 
camemberts, tout ce que vous voulez. 


Je croyais les ToolBox un peu 
poussiéreuses, mais Wagner vient de 
ressortir les anciennes mises à jour, et 
une nouvelle : la boîte à outils des 
trucs invisibles (The Invisible 
Tricks ToolBox). Je ne détaille 
pas, mais cette boîte à outils 
comprend plein de compléments utiles 
à ProCommand. Sacré AppleSoft : on 
n’en finira jamais de voir tout ce 
qu’on peut lui rajouter. Voyez le 
paragraphe sur “AppleSoft 16 bits” 
ci-dessous. 


MicroDot 


Et si, au lieu de rajouter des 
commandes à Basic.System, on se 
passait purement et simplement de 
lui, si on faisait une autre interface, 
plus économe en mémoire, entre 
l’AppleSoft et ProDOS 8 ? 

C'est ce qu’en silence avaient déjà fait 
certains éditeurs de jeux. C’est ce que 
s’est dit Jerry Kindall, de Kitchen 
Sink Software, avec son Micro- 
Dot, interpréteur de ProDOS passant 
par l’esperluette &. 

Si vous voulez gagner de la place 
mémoire, faire à peu près tout ce que 
fait Basic.System, et d’autres choses 
encore, MicroDot est pour vous. Un 
seul adversaire, en fait, à MicroDot 
(mais puissant) la force de 
l’habitude… 


Pom’s n° 44 


Émulation 


Après avoir fait l’éloge de la 
documentation française d’Hyper- 
Studio diffusée par ToolBox, je dois 
aussi faire l’éloge de celle de Bréjoux : 
elle est tout aussi bonne, et en plus 
Bréjoux rajoute une pile sur la CEE 
aux piles de démo d’HyperStudio. 
Chiche que ToolBox va rajouter ses 
piles. En tout cas : 1 partout. 

En revanche, j’ai vu la documentation 
française de Merlin chez ToolBox, et 
c’est un gros morceau. Mais pas chez 
Bréjoux : 2 à 1. 

Oui, mais Bréjoux a une 
documentation française de Publish-It, 
et pas ToolBox à ma connaissance : 2 
partout. 


Bon, je m'amuse un peu avec ce qui 
n’est même pas de la concurrence, 
mais une émulation bien 
sympathique. Nous ne sommes pas 
encore à nous plaindre de l’excès de 
vendeurs de softs Apple // en France. 
En tout cas, je sais qui est le gagnant 
dans l’affaire : vous et moi, les 
utilisateurs. 

Bréjoux a aussi des versions françaises 
de Top Draw (excellent logiciel 
StyleWare dont j'espère bien que 
Beagle va faire ses choux gras), de 
Graphic Writer (qui sera sans doute 
très bien quand on en sera 
effectivement à la version 3), et de 
Notes and Files et SoftWood 
GS File. Ces deux derniers logiciels 
de gestion de fichiers ont eu un certain 
succès aux débuts du GS. Mais 
aujourd’hui, mis à part le fait qu’ils 
sont francisés, et sans doute pas trop 
gourmands en mémoire, ils me 
semblent, pour être francs, plutôt 
périmés, dépassés par AppleWorks GS 
(que vend également Bréjoux). La 
démonstration de SoftWood GS File 
contient même une version fossile du 
système pour GS qu'il est 
condamnable de faire encore circuler 
aujourd’hui (alors que l’application 
semble marcher sous 5.0). 

Ce qui est intéressant dans tout Ça, 
c’est la tendance qui se dessine : de 
plus en.plus de documentations et de 
versions françaises, un marché GS qui, 
manifestement, est en croissance en 
France. En France comme aux USA, 





Sous le capot 





Réencreur 
pour bricoleurs 


Après diverses mentions dans Pom’s, 
voici aujourd’hui le point sur le 
réencrage et les réencreurs de rubans 
d'imprimante. Vous trouverez dans les 
Pom’s précédents les adresses pour 
acheter l’encre (pas chère), et les 
réencreurs tout faits si vous préférez 
payer que bricoler. 

Premier point : réencrez. Je sais que 
vous êtes comme moi, et que vous 
faites durer vos rubans d’imprimante 
au maximum, quitte à imprimer en 
gras, à faire passer trois fois la tête 
d’impression, etc. Et vous avez aussi 
tort que moi. 

D'abord, parce que la qualité de 
l'impression est directement fonction 
de la qualité de l’encre, c’est-à-dire de 
sa fraîcheur. La différence sur le papier 
entre une encre fraîche et un vieux 
ruban est phénoménale. J'ai moins 
envie de LaserWriter aujourd’hui que 
j'ai vu ce que donne un 
pr#l:catalog avec de l’encre fraîche. 
Après tout, une des supériorités de la 
Laser, c’est simplement d’alimenter en 
permanence en toner frais. 


Attention : je dis la fraîcheur de 
l'encre, pas celle du ruban. Il arrive 
fréquemment qu’une cassette neuve 
donne des résultats médiocres à 
l'impression, parce qu’elle a traîné 
quelques mois en stock sur une 
étagère, et que l’encre a commencé à 
sécher. En revanche, un ruban vieux, 
mais récemment réencré, donne des 
résultats excellents. 

Ensuite, réfléchissons : quand nous 
faisons durer un ruban, c’est entre 
autres par esprit d'économie. Or, que 
faisons-nous ? Nous remplaçons 
l’encre fraîche, qui ne coûte 
pratiquement rien (l’encre n’est pas 
chère, et il en faut très peu), par 
l’usure du ruban, sur lequel nous 
repassons plusieurs fois. Et surtout, 























nous usons les aiguilles de la tête 
d'impression, et le mécanisme de 
l'imprimante : et ça, ça coûte cher. 
L'économie passe pour le réencrage : 
plus besoin de nouveaux rubans (on 
peut réencrer des dizaines de fois le 
même ruban), et l’imprimante dure 
plus longtemps (parce qu’on lui 
demande moins, mais aussi parce que 
l’encre fait lubrifiant pour la tête 
d'impression). 

Voici donc comment fabriquer votre 
réencreur à peu de frais : il faut avant 
tout un moteur lent, capable 
d’entraîner le ruban dans la cassette à 
une vitesse d’un centimètre par 
seconde environ, et cela dans le sens 
indiqué par la flèche dessinée sur la 
cassette. En fait, si vous avez une 
perceuse qui fait aussi visseuse- 
dévisseuse, vous avez un réencreur. Il 
suffit de trouver quel tournevis est 
capable d’entraîner la cassette par 
en-dessous. En-dehors de cela, une 
bouteille d’encre spéciale, et vous avez 
tout le matériel nécessaire. 

Le réencrage consiste simplement à 
faire défiler lentement le ruban autour 
d’un tube-réservoir muni d’un petit 
trou qui dispense l’encre sur le ruban. 
Le réservoir est simple à fabriquer : il 
suffit d’un tube genre tube d’aspirine, 
dont le fond sera rempli sur 2 ou 3 cm 
de haut par un mastic quelconque non 
soluble par l’encre, ou ce que vous 
voulez. Juste au-dessus de ce fond 
surélevé, vous percez sur le bord du 
tube un tout petit trou. 

Autour de ce tube, placez deux 
rondelles de caoutchouc ou de 
plastique : vous réglez l’écartement de 
ces rondelles en les faisant coulisser 
sur le tube, de façon qu’elles guident 
votre ruban à sa largeur exacte, et 
vous permettent de choisir sur quelle 
zone du ruban vous déposerez l’encre 
(face au trou). 

Attention, c’est ici qu’il faut être 
précis : regardez bien votre ruban usé. 
Vous devez y voir deux traînées 
d'usure parallèles, l’une en haut, 
l’autre en bas. Votre ruban doit être 
placé sur le tube de telle façon que la 
traînée du bas soit juste en face du 





trou, et s’encre en défilant. La cassette 
étant un ruban de Moebius (votre 
ruban n’ayant donc, contrairement aux 
apparences, qu’une seule face), en 
passant deux fois la totalité du ruban 
vous encrerez les deux traînées. 

Si votre ruban n’a qu’une seule 
traînée, placez le trou au bas de la 
traînée, de façon à réencrage le haut de 
la traînée au deuxième tour. 

Mettez dans le tube la valeur d’un 
petit dé à coudre, pas plus, d’encre. 
Faites défiler le ruban. Regardez la 
traînée d’encre déposée sur le ruban : 
elle doit être continue, et large d’un 
millimètre au maximum. Si elle est 
en pointillés, le trou est trop petit ou 
le ruban défile trop vite. Si elle est 
large de plus d’un millimètre, c’est le 
contraire. 

Laissez le ruban défiler jusqu’à ce qu’il 
ne sorte plus d’encre par le trou : le 
tour est joué. Attendez quelques 
heures, que l’encre se répartisse 
d’elle-même sur les replis du ruban 
dans la cassette, avant d’utiliser le 
ruban réencté. 

Un conseil pour terminer: on met 
toujours trop d’encre. Il en faut très 
peu. Plutôt que de surcharger d’encre, 
qui ne s’enlève plus, réencrez plus 
souvent. Attention aussi si votre 
ruban interrompt à un moment son 
défilement sur le réencreur : le trou 
continuant à suinter, le ruban va être 
surchargé d’encre à cet endroit. En 
même temps que l’encre spéciale, 
achetez donc de l’acétone et un bon 
savon… 

Une fois compris le principe, vous 
avez aussi compris qu'avec des rubans 
vierges, des encres de couleur, et des 
tubes d’aspirine, vous pouvez faire des 
rubans de la couleur que vous voulez 
(y compris le blanc, le doré, etc., qui 
donnent des résultats magnifiques sur 
papier noir). 


Ventilateurs 


Vous connaissez mon conseil : l’unité 
centrale à la cave, capot ouvert, c’est 
le moins cher des ventilateurs. Reste 
que certains d’entre vous n’ont pas de 
cave, ou tiennent à voir leur unité 
centrale. Or, le rafraîchissement n’est 
pas un luxe : certes, le GS est conçu 
pour fonctionner même quand on se 
brûle en touchant les composants. 


Mais, avec 10 degrés de moins, vous 
aurez moins d’erreurs 911, et il durera 
plus longtemps. Un mot donc sur les 
ventilateurs. 


D'abord pour les bricoleurs : un 
ventilateur 220V style ventilateur de 
Hi-Fi se trouve pour 100 à 150 F dans 
les magasins de fournitures pour 
électronique et Hi-Fi. On en trouve 
pour rien du tout dans les vieux 
amplis jetés à la ferraille. Mais il faut 
bricoler. 


Il y a deux inconvénients des 
ventilateurs : ça fait du bruit et ça 
prend de la place sous le capot. Pour 
limiter le premier inconvénient, il faut 
un ventilateur spécialement étudié. Le 
plus silencieux, à ma connaissance (et 
le plus économe en électricité, 
puisqu'il est fabriqué en Écosse !), est 
le Cool-It, de Cirtech, alimenté sur 
la prise fan du GS (on peut contacter 
ToolBox, qui importe du matériel 
Cirtech). 

Seul problème possible : le Cool-It 
étant interne, comme le ventilateur 
Apple, certaines cartes d’extension 
encombrantes pourront manquer de 
place sous le capot. Et il vaut mieux 
ne pas trop tirer sur l’alimentation du 
GS, si on veut pouvoir remplir ses 
slots. 

Pour supprimer cet inconvénient, on 
trouve des ventilateurs externes, qui 
soufflent sur le GS (ou plutôt aspirent) 
depuis le couvercle de son capot 
(lequel est plein de trous, l’aviez-vous 
remarqué ?), et sont alimentés 
directement par EDF. Leur avantage 
est qu’ils peuvent faire plus que 
simplement ventilateurs : entre autres, 
ils font régulateurs de tension (ce qui 
n’est pas inutile du tout). 

Ils permettent d’avoir plusieurs sorties 
électriques (régulées) pour le 
moniteur, le disque dur, l’imprimante, 
le CD-Rom et le reste, toutes 
commandées par des interrupteurs en 
façade du GS (enfin). On peut donc 
tout allumer et tout éteindre d’un seul 
geste. 

Enfin, ils donnent une place bien 
pratique pour mettre les lecteurs 3,5", 
qui sans cela sont généralement à côté 
de l’unité centrale. Si vous n’avez 
qu’un lecteur 3,5", on peut mettre des 
disquettes dans le trou restant à côté, 
c’est prévu. Mais je ne le conseille 
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pas : à l’intersection des champs 
magnétiques émis par l’unité centrale, 
le moniteur et le lecteur de disques, la 
boussole s’affole, et les disquettes 
risquent de perdre le Nord. 


Les deux variantes que je connais de 
ces ventilateurs/régulateurs/interrup- 
teurs, sont d’une part le classique 
System Saver GS, de 
Kensington, d’autre part le tout 
nouveau Conserver, d’AE. AE a un 
avantage : avec Bréjoux, il a un 
concessionnaire en France. On peut 
donc espérer un Conserver en 220 
volts, avec des prises trois broches 
européennes en entrée et en sortie. 


Changer la pile 


Ça y est, cette irritante question des 
piles du GS qui s’usent trop vite est 
réglée. Bon sûr, mais c’est bien sang : 
si la pile est usée, il n’y a qu’à la 
changer pour une neuve ! Il n’y a pas 
besoin de dessouder, ça prend cinq 
minutes et ça coûte 10 dollars. Il 
suffit de commander (d'avance, de 
préférence) une pile de rechange (pile 3 
volts au lithium) à Nite Owl 
Productions. 

Le produit s’appelle Slide-On // GS 
Replacement Battery. Une 
remarque quand même : ne mettez pas 
l’ancienne pile à la poubelle, elle est 
très polluante. Apportez-la avec un 
beau sourire à votre concessionnaire 


Patchworks 


AppleWorks 3.0 : 
c’est reparti. 


Un nouvel AppleWorks, cela veut dire 
de nouveaux patches (même si 
beaucoup de patches anciens sont 
devenus inutiles avec la nouvelle 
version). Voici celui que j’ai cuisiné 
aussitôt après l’avoir reçu : il 
remplace ces satanés “à” un peu 
partout par des “!” (pour les caractères 
souris, on verra ensuite : allez, Éric, 


les vacances sont finies). 
SBLOAD APLWORKS, SYSTEM, A$2000, 


T$FF 
SPOKE 4335, 33 
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SBSAVE APLWORKS.SYSTEM, A$2000, 
T$FF 


Pour les patches UltraMacros : il faut 
faire poke $10EF, $21 (au lieu de 
$7C). 

Pour les patcheurs fous : notez que la 
version 3.0 semble avoir enfin utilisé 
les tables de datas (entre $1000 et 
$1100 ici) plutôt que le codage hard 
des versions précédentes. 


Fichiers spartiates 


Lancez GS Paint (ou PaintWorks 
Gold) sous le système GS/OS 4.0 ou 
5.0. Faites un dessin tout bête : un 
petit trait noir sur un fond blanc. 
Sauvez avec la commande Sauver sous 
ou Save Às (pas la commande PO-S) 
en format écran (pas en format 
GS Paint ou en format Apple), sous 
le nom de BLANC. Ensuite, avec 
PO-0, rechargez le dessin depuis le 
disque. 

— Bon, ça marche, et alors? 

— Eh bien, maintenant faites la 
même chose, tout aussi bête, avec un 
petit trait blanc sur un fond noir : ça 
ne marche plus ! Le dessin a 
apparemment été sauvegardé sur le 
disque, mais ensuite le fichier 
correspondant (NOIR) n’apparaît plus 
dans le catalogue. Plus moyen de le 
recharger du disque, de l’ouvrir ! 


Encore plus fort : quittez GS Paint, et 
cataloguez le disque avec vos deux 
dessins. BLANC fait 65 blocs, ce qui 
est normal, puisque sa longueur est de 
32768 (58000) octets. Mais NOIR, 
avec la même longueur, n’occupe que 
10 blocs! Comment est-il possible de 
caser 32768 octets en 10 blocs de 512 
octets ? 

L’explication de ce mystère, c’est ce 
qu’ Apple appelle les sparse files, ce 
que je traduis par fichiers spartiates. 
Schématiquement, quand ProDOS (8 
ou 16) ou GS/OS rencontrent, durant 
la sauvegarde d’un fichier, un bloc de 
512 octets entièrement composé de 
zéros, ils ne sauvent pas ce bloc sur le 
disque, pour gagner de la place. La 
longueur du fichier indiquée dans le 
catalogue est supérieure au nombre de 
blocs alloués, mais ça ne fait rien, le 
système chargera quand même le 
fichier sans problème. 





On s’était très peu rendu compte de 
cela jusqu'ici, parce que ProDOS 8 et 
ProDOS 16 ne font cela qu’exception- 
nellement, sur certains types de 
fichiers textes, très peu utilisés. Mais 
GS/OS le fait sur tous les types de 
fichiers, y compris les fichiers 
d’écrans graphiques ($C1). 

GS Paint ou PaintWorks Gold recon- 
naissent ces fichiers à leur type ($C1 
ou BIN) et à leur nombre de blocs 
occupés (65). Mais, si un dessin blanc 
(composé de $FF), occupe bien 65 
blocs sur le disque, un dessin noir (au 
moins avec les palettes standard), est 
essentiellement composé de zéros : le 
fichier est réduit à la portion congrue, 
et GS Paint ne le reconnaît plus ! 


Cela implique une morale pour les 
programmeurs : il ne faut pas analyser 
un fichier dans un catalogue par le 
nombre de blocs qu’il occupe, cette 
pratique étant une survivance du 
Jurassique moyen (sous Dos 3.3, on 
ne pouvait guère reconnaître un dessin 
HGR dans le fouillis des fichiers BIN 
que parce qu’il occupait 33 ou 34 
secteurs). 

Sous ProDOS, on ne doit s’occuper 
que du type principal et du type 
auxiliaire du fichier (à la rigueur, on 
pourrait s’en tirer avec la longueur du 
fichier, mais même cela n’est pas 
recommandé). Encore une fois, il faut 
se conformer aux directives données 
(de longue date en l’occurrence) par le 
Bureau Politique. 

Pour l’utilisateur, en revanche, pas 
d’ennuis : seules les applications qui 
font l’erreur de GS Paint poseront 
problème. Mais ProDOS 8 et 
ProDOS 16 chargent parfaitement en 
mémoire tous ces fichiers spartiates, 
même s’ils ne les sauvegardent pas de 
cette façon. 

La solution est donc toute trouvée : il 
suffit de faire un BLOAD du fichier 
sous ProDOS 8, puis un BSAVE 
par-dessus, et NOIR retrouve ses 65 
blocs. GS Paint acceptera à nouveau 
de le charger. Pour éviter qu’il ne le 
sauve à nouveau, sous GS/OS, en 
fichier spartiate, il suffit de le sauver 
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en format compressé (Paint ou 
Apple), la compression préalable 
évitant les blocs de 512 octets de 
Zéros. 


Le petit programme ci-dessous se 
charge automatiquement de rétablir la 
longueur des fichiers $C1 : je préfère 
cette solution à celle de patcher les 
applications. Songez à mettre le nom 
de catalogue adéquat dans la variable 
DI$ en ligne 1000. 


1000 DIM A$(15) : FI=0:K= 
1 : D$ = CHR$ (4) : DIS = 
"/MON.DISQUE" : PRINT D$"P 
REFIX"DIS 

1010 PRINT D$"OPEN"DIS;", TDIR" 


: PRINT D$"READ"DIS : INPUT 
A$,A$,A$ 

1020 INPUT A$ : IF A$ = "" THE 
N INPUT "“";A$ : GOTO 1050 

1030 IF MID$ (A$,18,3) = "$C1 
THEN FI = FI + 1 : A$(FI) 
= MID$ (A$,2,16) 

1040 GOTO 1020 

1050 PRINT D$"CLOSE" : TEXT :H 
OME : IF FI = O0 THEN 1070 

1055 PRINT D$"CAT 

1060 FOR I = K TO FI : INVERSE 


: PRINT A$(I) : NORMAL : PR 
INT D$"BLOAD'"AS$(I);",A$1000 
, T$C1 " : PRINT D$"UNLOCK'"A 
$(I) : PRINT DS$"BSAVE"A$(I) 
",A$1000,LS$8000,T$C1" : K = 
K + I : NEXT 


1070 PRINT D$"CAT" : END 


Encore une partie 


et j’éteins 


Mieux que sur Mac II 


Une étiquette sur la boîte le 
proclame : la version IIGS est plus 
rapide que la version Mac II couleurs ! 
Je ne sais pas si c’est vrai, mais si ça 
l’est, ce n’est pas forcément un 
avantage : j’ai fini par piquer une 
colère contre la Transwarp, qui 
accélère les choses sans se faire 
remarquer, et me faisait faire des 
scores ridicules ! 


Ce jeu s'appelle Crystal Quest et 
est édité par Casady and Greene. 
Le principe en est simple : il s’agit 
simplement d’animation de shapes, il 
faut manger tout ce qui rapporte des 
points avant de se faire manger. Ce 
n’est pas un jeu trop intellectuel, mais 
on s’y accroche bougrement. D’autant 
que la “bande-son” est vraiment, 
vraiment, très drôle. 

Bref, je vais vous faire un aveu : ce 
jeu est sur mon disque dur. 


AI, Michel... 


— Ah, bonjour, Jean-Yves. Tu 
remercieras les lecteurs de Pom’s de 
ma part : avec tout le lunarium qu'ils 
m'ont envoyé, ils ont permis de 
sauver la démocratie sur cette planète. 


Pour leur montrer ma reconnaissance, 
je leur donnerai un conseil : dans 
Test Drive //, d’Accolade, on fait 
de meilleurs scores sur le circuit de la 
disquette “California Challenge”, 
moins difficile que les montagnes de 
la disquette Master. Et je vais te 
confier quelque chose : je suis sûr que 
quand ils mettront une Chrysler dans 
les disquettes de Supercars, je battrai 
tout le monde. 

— Eh, mais Michel, tu causes, tu 
causes : tu ne joues pas? 

— Si, bien sûr. Simplement, là, j'ai 
le temps : je crée. Je fabrique mes 
propres niveaux pour Arkanoiïd 2, 
de Taito. Car le nouvel Arkanoïd a 
enfin ce que nous avons tous 
demandé : un éditeur de tableaux. 
Éditeur simple et impeccable, mais tu 
peux fabriquer des niveaux superbes. 
Et, tu comprends, avec les nouvelles 
caractéristiques assez démentes du jeu, 
je trouve que le hasard tient un tout 
petit peu trop de place dans le jeu au 
détriment de l’habileté : quand tu as 
tous ces bazars qui tombent et 50 
balles qui partent, le jeu joue tout seul 
en fait. Et puis, j'aimerais savoir si 
on peut gagner sur un niveau avec 
trois rangées de briques qui se 
reconstituent. Bon, je te laisse, il faut 
que je l’essaie. Si tu veux, je 
t’enverrai mes niveaux quand j’aurai 
fini de les tester. 

— Merci, Michel. Peut-être un jour, 
qui sait, une DPA de niveaux pour 
Arkanoid 2 ? 





18 trous 


Le golf devient un sport à la mode, et 
se démocratise. Après Mean 18, c’est 
tout simplement Jack Niklaus, un 
champion américain, qui vous initie 
aux joies des 18 trous chez 
Accolade. 


Un amateur consulté m’a affirmé que 
la simulation était excellente, 
meilleure que Mean 18. Dommage 
simplement qu’on ne puisse pas créer 
ses niveaux, comme dans Mean 18. 


Pour s’amuser 


Britannica Software est une maison 
qui s’impose sur le GS : c’est elle 
entre autres qui diffuse les jeux de 
“Fanfare”, un nouvel éditeur. Outre 
Laserforce, dont je parlerai plus 
longuement dans le prochain Pom'’s, 
deux nouveaux jeux Fanfare m'ont 
plu ce mois-ci : 

— Gnarly Golf est un mini-golf 
moitié billard très amusant, dans le 
genre Zany Golf (mais pas tout-à-fait 
aussi drôle, à mon avis) ; 

— The Great Western Shootout 
est un jeu de tir amusant, mais 
difficile dès qu’on avance un peu. 
Sans prétentions, ces jeux font tout de 
même passer un bon moment sur le 
GS. 


16 bits 


76 et 89 


C’est quand même un peu fort qu’en 
cette année de Bicentenaire, j’aie à 
vous entretenir d’un excellent logiciel 
de simulation, extrêmement 
intéressant et bien fait, un de ces 
éducatifs auxquels on joue pour le 
plaisir, logiciel de simulation de la 
Révolution... américaine de 1776 ! 
Éditeurs de logiciels, à quoi 
servez-vous? Et Ministère de la 
Culture, à quoi sers-tu ? 

Bon, c'était ma colère de ce numéro. 
Reste à vous dire un mot de 
l’excellent Revolution 76, de 
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Britannica Software, l’éditeur de 
logiciels qui monte sur GS. En gros, 
je dirais ceci : comme cours d’anglais, 
comme cours d’histoire des USA en 
même temps, c’est passionnant. Sûr 
que les élèves voudront rester après la 
sonnerie. 


5.0 : 
les bonnes surprises 


+ Vous connaissiez déjà, avec le 4.0, 

le truc d’appuyer sur Escape au 
début du chargement. Avec le 5.0, 
c’est toujours vrai, mais il y en a un 
autre : appuyez sur les deux 


+ Dans le Finder, appuyez sur shift 
et option, et cliquez sur la pomme 
de la barre de menus. Choisissez la 
nouvelle option About, cliquez 
ensuite sur chacune des icônes de la 
fenêtre. 
Le sens de l’humour ne se perd pas, 
chez Apple 


5.0 : 
les mauvaises surprises 


° Apple a lui-même rendu public un 

bug qu’il a laissé dans la version 
1.3 de Basic.System. Je ne détaille pas 
ce bug, mais il peut altérer des fichiers 
sur disque. Conclusion : recopiez le 
Basic.System du 4.0 sur votre copie 
du 5.0, en attendant la correction. 


+ Si vous allez jusqu’au bout des 
options du tableau de bord “de 
bureau” (en NDA, à la Mac) du 5.0, 
vous trouverez une option de 
reconfiguration du langage des 
applications QuickDraw (AppleWorks 
GS etc.). Je conseille très vivement de 
choisir l’option pas de reconfi- 
guration, et de continuer à utiliser le 
NDA Clavier bien tempéré 
d’Yvan Koenig et autres, dans sa 
version la plus récente. 
L'option du tableau de bord de GS/OS 
est compliquée à utiliser, incomplète, 
gène certaines applications. Le Clavier 
bien tempéré est complet, clair, bien 
documenté, et bien débugué (et rajoute 
des possibilités bien pratiques de 
sauvegarde et d'impression de l’écran 
graphique, d’éjection, etc.). 
Messieurs d’Apple USA, pourquoi ne 
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pas demander à des français de faire 
cette option eux-mêmes ? D'autant 
que j’ai vu, grâce à la seconde bonne 
surprise, un certain Xavier Schott dans 
l’équipe des auteurs du 5.0... 


* Je crois bien avoir rencontré un 
bug assez grave dans le 
fonctionnement du Standard File (outil 
23). Quand, en utilisant l’option 
Sauver sous ou Save as du menu- 
Fichiers (File) des applications de 
bureau, on veut sauver sous le même 
nom un fichier déjà existant dans le 
catalogue concerné (par exemple pour 
sauver une image sous un autre 
format, ce qui ne peut pas être fait 
avec PO-S), on devrait avoir une 
fenêtre de dialogue à boutons nous 
demandant confirmation. 
Avec le Standard File du 5.0, on a au 
mieux rien du tout (pas de dialogue, et 
pas moyen non plus de sauver le 
fichier, à moins de changer de 
catalogue ou de nom), et au pire un 
beau plantage (le fichier est perdu). 
Comme cela arrive aussi bien avec 
Arkanoid 2 qu'avec PaintWorks Gold 
ou AppleWorks GS, je pense que c’est 
bien un bug du système. 
En tout cas, j'ai renommé le fichier 
/SYSTEM/TOOLS/TOOL023 du 5.0 en 
/SYSTEM/TOOLS/TOOL023.5. 0 et j'ai 
rajouté dans /SYsTEM/TooLs du 5.0 le 
TOOLO023 du 4.0 (cette modification 
peut être défaite et refaite à volonté, 
entre deux applications). 


* Il semble que dans certaines 

configurations du GS et d’Apple- 
Works avec TimeOut, UltraMacros, et 
un assortiment de patches variés, 
AppleWorks 8 bits plante quelquefois 
au chargement quand on le lance 
depuis le 5.0 (sans doute le retour 
d’une ancienne erreur de ProDOS 16 
signalée dans nos colonnes par Pierre 
Demblon). Le remède : celui de Pierre 
Demblon, un petit Reset préalable, 
sous ProSel 8 ou dans un mini-fichier 


pour lancer Apple Works. 
e J'ai retrouvé dans une 
documentation de GS/OS 


comment maîtriser la numérotation 
des devices GS/OS, qui m'a fait 
grincer des dents avec ProSel 16 (voir 
Pom’s 43) elle dépend tout 


simplement de l’ordre des fichiers de 
drivers dans le sous-catalogue 





/SYSTEM/DRIVERS. Sachant que le 
disque de boot sera toujours placé en 
n° 1, si vous mettez le driver 
SEXY.DRIVER en tête du catalogue, 
votre disque dur et votre lecteur de 
CD-Rom seront placés en 2 et 3, le 
driver suivant affectera ses lecteurs en 
4, etc. En jonglant un peu, je suis 
parvenu à placer quelques-uns de mes 
disques à un numéro correspondant à 
celui du slot dans lequel ils sont. 


Softs Wagner : 
quelques problèmes 


Quelques problèmes encore avec les 
logiciels de Roger Wagner, dont les 
utilisateurs doivent être avertis. 


+ SoftSwitch ne fonctionne pas 

avec le système 5.0 : on ne peut 
pas sauver un espace de travail sous 
P8 et Basic.System, Softswitch 
croyant qu’il s’agit d’une application 
ProDOS 16. 


+ MacroMate ne fonctionne pas 

encore impeccablement en clavier 
français : essayez, sous Basic.System, 
d'enregistrer et de renvoyer la macro 
CALL - 151. Les touches lettres et 
chiffres (minuscules et majuscules) du 
clavier fonctionnent bien, mais pas la 
plupart des autres. 


+ Avec le 5.0 et quelques 

accessoires, The Graphic Ex- 
change ne trouve pas libres les bancs 
qu’il souhaite en bas de la mémoire, et 
refuse de se charger. 


Soyez tranquille cependant : Roger 
Wagner est au courant de tout Ça, et y 
travaille. 


* Enfin je rappelle à ceux qui ont été 

surpris par HyperStudio que ce 
n’est pas encore une version 
définitive, que la mise à jour sera 
gratuite. Et que l’interface “à la Mac” 
ne doit pas nous cacher la nécessité 
de... lire les documentations. L’hyper- 
média, ça doit s’apprendre, comme le 
reste. 
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Éditeurs de ressources 


Ce n’est pas encore ResEdit du Mac, 
mais ça vient. Désormais, pour 
programmer fenêtres, menus, boutons, 
contrôles et Cie sur le GS, nous allons 
simplement dessiner le truc à l’écran, 
et cocher des cases, au lieu de ces 
immenses tableaux de datas à remplir 
bit par bit qu’il fallait jusqu'ici écrire, 
quel que soit le langage de 
programmation utilisé. 

Le seul à ma connaissance à intégrer 
totalement la notion d’éditeur de 
ressources au sens du système 5.0 
(c’est-à-dire au sens du Mac), à faire 
donc des fichiers objets avec 
ressources, c’est TML Pascal //, de 
TML Systems. TML Pascal étant 
déjà, pour le moment, le langage le 
plus utilisé sur GS, il va évidemment 
faire un tabac. 

Mais bien entendu Apple, avec APW, 
et ByteWorks, avec Orca, sont sur le 
même coup, puisque c’est une 
caractéristique du système 5.0. 

D'ores et déjà, même si elles ne font 
pas des fichiers avec ressources, 
nombre d’applications nous 
permettent de dessiner directement sur 
l’écran ce que nous voulons, 
l’application se chargeant de 
transformer tout ça en code source. 


Vous trouverez dans le sous-catalogue 
/SUPPLEMENT de la disquette 3,5" de 
ce numéro une application freeware 
appelée Dialog Maker, de Steve 
Stephenson, qui fait cela pour 
Merlin 16 : dessinez vos fenêtres, 
cliquez sur leurs caractéristiques. 
Quand c’est fini, sauvez le code source 
sur la disquette : il ne reste plus qu’à 
le coller dans votre source Merlin. 


Plus complète est l’application 
Design Master, montrée par Chris 
Haun à Kansas City. C’est un 
indispensable quel que soit le langage 
dans lequel vous programmez. Ariel 
Publishing a décidé de la diffuser pour 
environ 30 dollars. 


+ Enfin, je dirais un mot ici d’un 

excellent ensemble de 
programmation en assembleur 8 bits 
pour ProDOS 8, apporté à Kansas 
City par son auteur, un employé 
d’Apple (Eric Soldan), qui le diffuse 
gratuitement. App Builder est un 
super-ensemble de macros 
extrêmement complet, en fait un 


‘langage. Pour le moment, seule existe 


la version pour MPW du Mac, mais 
bientôt les versions APW et Merlin. 


AppleSoft 16 bits 


Rien à faire : même si le GS n’est pas 
prévu pour cela, nul n’empêchera les 
utilisateurs de chercher à utiliser ses 
capacités graphiques et sonores avec 
l’AppleSoft. Voyez la collection de 
Pom'’s, par exemple. 


Une des premières tentatives globales 
pour permettre de gérer le GS à partir 
de l’AppleSoft fut Iconix et Sonix, de 
So What Software. Ça marche, 
surtout Sonix, mais ça fait des 
programmes en Poke, Peek et Call. 
totalement illisibles. 


Lynx Computer, une nouvelle 
entreprise domiciliée (est-ce un 
hasard ?) à quelques encablures 
d’Applied Ingenuity, nous propose 
une formule plus claire : utiliser les 
&, elle aussi, pour gérer le graphisme 
du GS avec SuperGraphix 256, et 
la musique avec SuperMusic.&« 
DRAW, & PLAY,& COLOR, & WAVE, je 
comprends. 


Deux choses fort intéressantes dans 
SuperGraphix d’une part la 
possibilité d’afficher 256 couleurs en 
même temps, et de mélanger mode 
640 et mode 320 sur le même écran, 
qui est dans le GS, est directement 
offerte aux programmeurs. D'autre 
part, la possibilité d’animer des 
formes (shapes) en SHGR, formes 
qu’on aura découpées dans n’importe 
quelle image SHGR des DPA Pom's, 
avec le programme (shape grabber) 
fourni. 


SuperMusic, quant à lui, nous 
rappelle que l’Ensoniq a 32 
oscillateurs indépendants, dont 30 
utilisables : avec SuperMusic, on peut 
faire jouer les 30 en même temps 


À lire 
Au boulot 


Même si Apple ne le sait pas assez, 
un Apple // est aussi une excellente 
machine pour travailler. C’est ce que 
démontre très bien la nouvelle revue // 
At Work : Apple // Producti- 
vity News. 


Barney Stone, de Stone Edge 
Technology, qui produit une des 
meilleures bases de données tournant 
sur ordinateur personnel (DB Master), 
en est l’éditeur. On trouve dans cette 
revue ce qu’on ne trouve pas ailleurs, 
des “nouvelles d’entreprise” d’ Applied 
Ingenuity, Berkeley SoftWorks, et 
d’autres. Les propos visant Apple y 
sont parfois assez durs : qui aime bien 
châtie bien. 


800 pages de codes 


800 pages de codes d’imprimante, ça 
ne se lit pas facilement dans le métro. 
C’est en fait un manuel de référence 
des codes d’imprimante, de toutes les 
imprimantes imaginables : bref, il ne 
sera guère utile qu’aux développeurs 
qui écrivent des drivers d'imprimante. 
Mais à ceux-là, il sera indispensable. 
Il s’appelle The HandBook of 
Printer Commands, et est dispo- 
nible (en trois volumes!) chez A2 
Central. 


Bibliographie 
pour débutants 


Plusieurs d’entre-vous me l’ont 
demandé : que faut-il lire quand on est 
un utilisateur débutant du GS ? Et que 
faut-il lire quand on est débutant et 
qu’on veut programmer son GS ? 


Il m’est très difficile, je l’avoue, de 
répondre aux premiers : il nous 
faudrait un bon Guide de l'utilisateur 
de GS, en français. Mais ça n'existe 
pas, à ma connaissance du moins. 
C’est au point que j’ai songé... à en 
écrire un moi-même (quelque chose du 
genre “La Pomme sans les Pépins”). 
Faites-nous savoir si cela vous 
intéresse. 
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Pour les seconds, c’est plus facile : 
tous les titres ont déjà été mentionnés 
dans Pom'’s. La seule difficulté est de 
ne pas se laisser impressionner par le 
langage mentionné dans le titre du 
livre : programmer le GS en 
assembleur, en C, en Pascal, etc., 
c’est toujours en fait la même chose. 
C’est interfacer la Boîte à Outils du 
GS. Lisez donc les ouvrages vous 
introduisant à la ToolBox, quel que 
soit leur langage de référence. Pour 
programmer le GS, prenez le langage 
que vous connaissez déjà. Si vous 
n’en connaissez aucun, je conseillerais 
TML Pascal // (voir ci-dessus). 

Vous trouverez les références 
nécessaires dans les Pom’s précédents. 
Je conseille en premier lieu les livres 
d’Apple même, qui sont pédagogi- 
quement excellents. Et vous ne 
pourrez pas éviter les deux volumes du 
ToolBox Reference. 


Supplément 


Sur la disquette 3,5" de Pom’s 44 
disponible en option, dans le 
sous-catalogue /SUPPLEMENT, VOUS 
trouverez quelques programmes 
freeware intéressants pour GS 
essentiellement : 
+ Dialog Maker, l'excellent 
utilitaire de fabrication sans peine 
de code source pour Merlin (voir le 
passage sur les éditeurs de ressources). 
+ Desk Color, un NDA amusant 
qui vous permet de changer à tout 
moment la couleur de fond du bureau. 
°  Concentrate, un jeu énervant qui 
nous montre combien peu nous 
avons de mémoire (forcément, la 
machine en a plus ; il faut donc la 
forcer à se tromper pour avoir des 
chances). 
° Dirmap, un utilitaire qui nous 
montre de façon graphique 
comment sont occupés nos disques. 
Ce n’est pas seulement amusant, c’est 
utile. 


+ Quelques icônes pour varier 
l’aspect du Finder. 

° Un utilitaire bien précieux pour 
ceux qui ont une PC Transporter: 

il formate automatiquement un disque 

ProDOS en MS-DOS-beurk. C’est 
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particulièrement précieux avec les 
programmes de RAM-disque de 
ProSel. 
+ Un Puzzle un peu énervant 
aussi: après vous être échiné 
quelques heures, au bord de l’asphyxie, 
vous demandez à voir la solution. Et 
hop, en moins de 10 secondes, on 
vous montre combien c’était facile ! 
* Enfin Quadomino, un gros NDA 
un peu spécial : c’est le jeu Tetris 
présenté en accessoire de bureau ! 
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* le numéro entre parenthèses indique la revue dans | 
laquelle le produit est décrit. | 


Revues 


n° 8à n° 26, chacune 
n° 27 à n° 44, chacune 


40,00 
45,00 | 


Recueils Pom's 


Ces recueils regroupent 4 numéros 
de la revue. (Recueil 5 à 8 épuisé) 


140,00 





Logiciels pour Apple // 


| Ces logiciels peuvent être livrés en 140 ou 
| 800Ko (préciser). Les logiciels américains sont 
accompagnés d'une documentation française. 


Tarif Jokeræ Tarif normal 


| ProCommand 450,00 500,00 
ChessMaster GS 800Ko (39) 630,00 700,00 
Arlequin 140Ko (39) 135,00 150,00 
Copy ][+ version 8.3 (37) 450,00 500,00 
ProSel (36) 450,00 500,00 
Compilateur Beagle (35) 675,00 750,00 
Big U 140Ko (35) 400,00 450,00 
Pom_Link 3.1 (34/35) 400,00 450,00 

| InterPom's 2.0 (31) 540,00 600,00 

| Civ_Pom's (31) 180,00 200,00 
EPE 5.1 (15/23) 180,00 200,00 


Recueils n° 1 à 4,9 à 12, chacun 


Câbles communication 


Pour la mise en œuvre de ces câbles, 
se reporter aux numéros 27, 28, 30, 
31, 33 et 34 qui présentent les 
programmes de communication 
reliant ordinateur et Minitel. 
Préciser le ou les modèles 
d'ordinateur. 


Câble Minitel/ordinateur 
Câble Ordinateur/ordinateur 


225,00 
225,00 


Reliures 


Pour la protection et le classement 
de 6 numéros de Pom's (un an) 


Reliure 75,00 


Disquettes Pom’s, Macintosh 


Ces disquettes regroupent 
l'ensemble des programmes pour 
Macintosh d'une revue. Pro- 
grammes du domaine public, 
polices de caractères, nouveaux 
systèmes, etc. y sont ajoutés. 


3,5”, de la n° 16 à la n° 44, chacune 80,00 


Disquettes Pom's, Apple // 


Ces disquettes regroupent 
l'ensemble des programmes pour 

Apple // d'une revue. 

5,25” 140Ko, de la n° 1 à la n° 44, chacune 


3,5” 800Ko, de la n° 29 à la n° 44, chacune 


80,00 
80,00 
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Logiciels pour AppleWorks 


Ces logiciels dotent AppleWorks de la souris, 
de polices de caractères, etc. 


Tarif Jokeræ Tarif normal 


MacroTools II (44) 270,00 300,00 

DeskTools II (44) 495,00 550,00 

ExtraFonts (43) 450,00 500,00 

TimeOut PowerPack (41) } 675,00 750,00 

TimeOut FileMaster (41) 

TimeOut SpreadTools (41) 495,00 550,00 

MacroTools (41) 270,00 300,00 
| TimeOut DeskTools 1 (41) 495,00 550,00 

TimeOut Paint(39) 270,00 300,00 

TimeOut SuperFonts (38) 720,00 800,00 

TimeOut UltraMacros (38)* 585,00 650,00 

TimeOut Graph (38) 765,00 850,00 

TimeOut SideSpread (38) 495,00 550,00 

PathFinder (38) 135,00 150,00 

Polices de caractères 

Ces polices de caractères de type Macintosh 

fonctionnent avec AppleWorks & SuperFonts. 

Une trentaine de polices par disquette. 

‘Polices’ 001 à 018, 140 ou 800Ko, chacune 100,00 

Catalogue de référence Unipol 80,00 

Shareware Apple // 

Disquettes présentées dans lesnuméros38,39, 

41, 42, 43 & 44. 

DPA 001 à 026, 140 ou 800Ko, chacune 100,00 
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Logiciel pour IBM PC 


* Accompagne le livre ‘Les Secrets de 
Multiplan’ de H. Thiriez 


Les Secrets de Multiplan* 175,00 
InterPom's 540,00 600,00 
ZipChip 


Nouveau processeur 4 Mhz pour les Apple / 
/e et //c. Description dans le numéro 39 de 
Pons. 
Tarif Joker& Tarif normal 
2250,00 2 500,00 
50,00 50,00 


ZipChip 4 Mhz 
Port (urgent recommandé) 


Logiciels pour Macintosh 
Tarif Joker® Tarif normal 


Sargon 4 (40) 540,00 600,00 
Excel Efficace 175,00 
MacAstuces 200,00 
Le Livre du Macintosh 200,00 
Copy I! Mac version 7.2 (37) 450,00 500,00 
Pom_Link 3.1 (34/35) 400,00 450,00 
InterPom'’s 2.0 (31) 540,00 600,00 
Clv_Pom's (31) 180,00 200,00 
Raccourci (26) 180,00 200,00 
Shareware Macintosh 

Disquettes présentées dans les numéros 22 & 

Mac A, B, C, D, E, F, G, H, I, chacune 100,00 
ADN (6 disquettes) 300,00 


Abonnements 1 an (6 numéros) 


&L'abonnement à la revue Pom’s comprend 
l'attribution automatique de la carte “Joker”. 
Celle-ci offre un accès privilégié à une 
assistance téléphonique et donne droit aux 
remises sur les produits Pom's. 


Revue seule 225,00 
Revue et disquettes Apple // 140Ko 625,00 
Revue et disquettes Apple // 800Ko 625,00 
Revue et disquettes Macintosh 625,00 





Gagnez du temps. Commandez 
par Minitel au : 






(1) 39 53 04 40 
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Bon de commande 


Je désire recevoir : 


Quant. Produit Prix total 








J'ai un lecteur Apple // 140Ko Q 
J'ai un lecteur Apple // 800Ko Q 
Montant 


Port avion hors CEE 
15,00 F par revue et/ou disquette 


Montant total 


Ma commande atteint 1400,00 F (abonné 1000,00 F), 
je désire recevoir le programme Arlequin qui m'est offert. 
oui /non 


Je règle Chèque 

par : Carte Bleue/Visa/Eurocard/Mastercard 
NUMÉRO, comme cornes pers 
Expiration __ 1/22 
Signature 

Nom 

Prénom 

Adresse 


n° de carte Joker 


y  CHESSMASTER 2100 





NIVEAUX DE JEU 

LE SOMMET DE LA REFLEXION INFORMATIQUE : CHESSMASTER 
2000 + L'EQUIVALENT DE 10 ANNEES DE RECHERCHE 

BIBLIOTHEQUE D'OUVERTURES CONSIDERABLE (PLUS DE 150000 
COUPS) 

NOMBRE ILLIMITE DE NIVEAUX DE JEU, DE DEBUTANT A GRAND 
MAITRE 

POUR CHAQUE NIVEAU, OPTION ‘JEU SIMPLIFIE’ 

EN MODE APPRENTISSAGE, CHESSMASTER 2 100 INDIQUE LES 
COUPS ET LES PRISES POSSIBLES 





TEMPS DE REFLEXION 

CHoIx DU TEMPS DE REFLEXION PAR COUP, PAR PARTIE, 
EGALEMENT EN COUPS PAR MINUTE ET TEMPS STANDARDS 
DES TOURNOIS 

OPTION TEMPS EGAL, OPTION ‘BLITZ’ 


DES AIDES 

CHESSMASTER 2 100 PEUT SUGGERER UN COUP, REVENIR EN 
ARRIERE ET REJOUER LES COUPS 

POSSIBILITE DE CHANGER DE COTE A TOUS MOMENTS 
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LE MAÏÎTRE 


Pom’s vous PROPOSE 
AUJOURD'HUI SUR GS UNE 
EXTRAORDINAIRE VERSION 
DU MAITRE DES JEUX, 
CAPABLE DE 
PERFORMANCES 
D'EXCEPTION. 


AFFICHAGE 

UTILISATION DES RESSOURCES DU GS : SUPER HAUTE 
RESOLUTION, MENUS DEROULANTS, SOURIS... 

PENDULES TEMPS REEL A L'ECRAN 

AFFICHAGE DE L'ECHIQUIER EN 2D ou 3D 

POSSIBILITE DE DESSINER SOI-MEME LES PIECES, DE TOURNER 
L'ECHIQUIER PAR QUART DE TOUR, DE JOUER ‘A L'AVEUGLE’ 

AFFICHAGE POSSIBLE DE VOS COMMENTAIRES SUR LES COUPS, 
DES PIECES DEJA PRISES, DE LA REFLEXION DE 
CHESSMASTER 


POUR PROGRESSER 

AFFICHAGE POSSIBLE DE LA REFLEXION DE CHESSMASTER 
POSSIBILITE D’ANALYSE DES PARTIES 

110 PARTIES DE MAITRES ENREGISTREES AVEC COMMENTAIRES 





SAUVEGARDE ET IMPRESSION DES PARTIES 

RESOLUTION DE PROBLEMES D’ECHECS 

PARTIES A ‘AVANTAGES’ 

MODE D'EMPLOI COMPLET POM'S, EN FRANCAIS, COMPRENANT 
UN MANUEL D'APPRENTISSAGE DE LA FEDERATION US 
D'ECHECS ET UN HISTORIQUE DES ECHECS PRESENTANT LES 
MAITRES 


DE PLUS, VOTRE GS PARLE... 
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La q 


Le célèbre programme 
d'échecs Sargon 4 est 
aujourd'hui doté de l'un 
des algorithmes de 
réflexion les plus puis- 
sants. 


145 000 coups 
d'ouverture 


Il offre une biblio- 
thèque d'ouvertures de 
145 000 coups qui lui 
permet d'économiser un 
temps précieux en 
début de partie. 


Sargon 4 joue fort bien 
et est à même de 
s'adapter à tous les ni- 
veaux. 





À la portée 
du débutant 


Sargon 4 pense aux 
novices : 

Le livret explicatif 
donne les bases 
nécessaires. Un niveau 
de jeu spécial ‘débutant’ 
est prévu. 


LL TT 
q Fr — 
1m 





rième 


Il est en outre possible de re- 
venir en arrière, de changer 
de camp, de modifier les po- 
sitions.. et même de suivre 
la réflexion de Sargon. 








Affichage 3D 


Sargon 4 présente la table 
d'échecs en deux ou trois di- 
mensions (perspective) avec 
cinq jeux de pièces. 


Sur Macintosh II, l'affichage 
est en couleurs, rendant 
ainsi l'échiquier encore plus 
lisible. 


Des pièces éditables 


Vous dessinerez vous-même 
vos pièces pour l'affichage en 
perspective. Vous pourrez 
aussi modifier les formes et 
couleurs des jeux de pièces 
proposés. 


Sargon 4 sait rejouer toute 
une partie en analysant 
chaque coup ; cette méthode 
d'apprentissage est incompa- 


énération 


| Affichage des coups joués 





rable. Et, pour aller plus loin, vous étudierez 
les 107 parties célèbres que Sargon vous 
propose. 


Et de plus. 


Sauvegarde, impression des parties 
Pendules d'échecs à l'écran 


Changement du sens de l'échiquier 
Recherche de mats 

Temps de réflexion de 5 secondes à l'infini 
Parties à temps limité 

Possibilité de proposer le nul. 


Sargon 4 fonctionne sur Macintosh 512 avec 
lecteur 800Ko, Mac Plus, Mac SE et Mac II. 


Guide d'apprentissage et 
mode d'emploi complets 
Traduction intégrale 
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Essai dans le numéro 40 de Pom's 
Bon de commande en fin de ce numéro 




































Livres 
Où vous les procurer ? 


Pour les documentations 
vous connaissiez : 


- InterÉditions : 
— Prim’Vert... 


Mais connaissez vous... 


Infoteque 

32, rue de Moscou 
75008 Paris 

© (1) 45.22.67.01 





Vends Apple //c, moniteur mono 
Zénith, souris, deuxième lecteur 
5,25”, imprimante : 6 500,00 F. 
Champeyrol Jean-Marc 

© 43 50 76 06 


Vends Apple //e 128 Ko 80 co- 
lonnes 65C02, 2 lecteurs + moni- 
teur + interface Epson : 4 000,00 F 
et logiciels : Mouse Desk 2.0, 
SuperAppleWorks 1.4 & Super- 
MacroWorks, ProSel, Copy Il+ 1.7 
ChessMater 2000, etc. 

Zip-Chip 4 Mhz 2 000,00 F — 
Carte Super Série 500,00 F — 
Souris et carte 600,00 F — Lecteur 
Unidisk 3,5” et carte 1 500,00 F — 
Carte AE RamWorks (80 col. + 
1 Mo) 4 000,00 F — Disque Dur 
Profile 5 Mo + carte 2 500,00 F — 
Interface // graphique 200,00 F — 
Carte Z80 CP/M 200,00 F. 

Le tout : 13 000,00 F. 

Pierre Duchesne 

Sous la Haie - 35540 Plerguer 
©99.58.90.38 


Vends Apple IIGS, écran mono- 
chrome 1Mo, HD 20 Mo, 1 lecteur 
3,5”, VS Com 21 : 10 000,00 F. 
Imprimante ImageWriter I grand 
chariot 1 500,00 F — OMNIS II, 
Works 1,2” pour Macintosh (avec 
factures), prix interressant. 

Dr Bismuth 

© 49.09.55.48 





| 
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Vend Unité Centrale d’ Apple //c 
128 Ko 2 500,00 F, 384 Ko 

3 500,00 F — 1 Écran plat 

1 000,00 F — 1 Moniteur + sup- 
port 600,00 F. 

Unité Centrale d’Apple IIGS 
512 Ko 3 500,00 F — 1 lecteur 
800 Ko 1 500,00 F — Logiciels 





CES 


Vends, pour cause double emploi, 
unité centrale d’ Apple //e avec carte 
Chat Mauve, faire offre à : 

Pierre Vachler 

© 56.62.21.87 


Cherche contacts sur tout Apple, 
dans le bordelais, pour ne pas 





originaux à débattre. évoluer seul. 
Joseph Novak Pierre Vachler 
© (1) 43.38.92.80 le mardi et © 56.62.21.87 (entre 19 et 21 h) 
mercredi de 18h00 à 20h00. 
Horizontalement 


1 - Ensemblier 


2 - Pas nécessairement naturiste ! 


3 - Plaisenterait 


4 - Tourmente - Général français 


S - Attions - Infinitif 


6 - Règle - Béatifiée - Ainsi de suite 


7 - Maïs - Classer ai 

8 - Aïeul - Sa baie est célèbre 

9 - Panier percé - Département 
10 - Bon copain - Coffres 


Verticalement 


1 - Effectua un nettoyage |! 


2 - isoler - Donc avant le déjeuner 
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3 - Rendit illisible - Dans l’alphabet 


4 - Oxydes de fer 
5 - Reproduits 
6 - An - insecte 












7 - Traînes - 1 
Personnel 

8-Soclerenversé- 2 
Déménageût 3 

9 - N'est donc pas un 
gadget ! 4 


10 - Rererelabourions 


par 
Joëlle Piard 


ë 
Problème 44 7 
8 
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LHS2 HSE A 
RIRE 
V'UFRRRREER 
AL | LILIT 
ERRER HSE 
FCUFNRER HA 
EN EN HER 
EN SRE 


EREEE HERE 
CRE HER 


5 6 7 8 9 10 






Pom'’s n° 44 











Certaines 
nuits ne 
portent pas 


conseil... 
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